A046964 Sin(n) decreases monotonically to -1.

1, 3, 4, 5, 11, 344, 1054, 1764, 2474, 3184, 3894, 4604, 5314, 6024, 6734, 7444, 8154, 8864, 9574, 10284, 10994, 11704, 12414, 13124, 13834, 14544, 15254, 15964, 16674, 17384, 18094, 18804, 19514, 20224, 20934, 21644, 22354, 23064, 23774, 24484, 25194, 25904

Offset: 1

Author

Wouter Meeussen

Keywords

• nonn

Comments

Sin(10265498) =-0.9999999999999999313932793053103935998520142594607...

Links

• Hugo Pfoertner, Table of n, a(n) for n = 1..93, terms a(1)..a(88) from Robert G. Wilson v

Crossrefs

Cf. A046959, A046965.

Programs

Mathematica

z={}; current=1; Timing[ Do[ If[ Sin[ n ] d, d = a; Print@n; AppendTo[lst, n]], {n, 111111111}]; lst (* Robert G. Wilson v, Aug 24 2007 *)

PARI

d=oo; print1("1, 3, "); for(k=1,10^8, my(di=2*k/Pi,dir=round(di),dd);if(dir%4==3,dd=abs(di-dir); if(ddHugo Pfoertner, Feb 29 2020