A131853 Numbers m such that z(m)=(0,0) with z as defined in A131851.
0, 5, 10, 15, 20, 30, 40, 45, 60, 65, 75, 80, 85, 90, 95, 105, 120, 125, 130, 135, 150, 160, 165, 170, 175, 180, 190, 195, 210, 215, 225, 235, 240, 245, 250, 255, 260, 270, 300, 320, 325, 330, 335, 340, 350, 360, 365, 380, 390, 420, 430, 450, 455, 470, 480, 485
Offset: 1
Keywords
Links
- Seiichi Manyama, Table of n, a(n) for n = 1..10000 (terms 1..1000 from Reinhard Zumkeller)
Programs
-
Mathematica
z[n_] := z[n] = If[n == 0, 0, z[Floor[n/2]] I + Mod[n, 2]]; Flatten[Position[Table[z[n], {n, 0, 500}], 0] - 1] (* Jean-François Alcover, Oct 12 2021 *)
Comments