7 Aug
2017
7 Aug
'17
5:04 a.m.
More generally, there is no threefold rotational symmetry. Julian's function can produce only gridpoints: ListPlot[{3, 1} # & /@ NestWhileList[{#[[1]] - Floor[64 #[[2]]/127], #[[2]]} &@ {#[[1]], #[[2]] + Floor[381 #[[1]]/128]} &@ {#[[1]] - Floor[64 #[[2]]/127], #[[2]]} &, {2, 1}, # != -{1, 4} &], AspectRatio -> 1, Axes -> False, Frame -> True] gosper.org/trinsky3spiral.png And all the arguments to the Floors are merely rational. --rwg