Tag Info

New answers tagged

2

f[x_] := StringTake[IntegerString[Hash[ToString@x, "SHA256"], 16], -4] (* tiny version of requested function *) Clear[collision]; collision::usage = "store potential collisions as downvalues"; collision[_] = {}; Block[ {y}, For[i = 1, i <= 1000, i++, y = f[i]; collision[y] = Append[collision[y], i] ] ]; Sort[Select[#[[1, 1, 1]] -> ...


3

VertexOutComponent gives VertexOutComponent[g, b, 1] (* {b, d, e} *) This is precisely what you are looking for, plus the vertex b itself.



Top 50 recent answers are included