A046959 - OEIS

A046959

Numbers k where sin(k) increases monotonically to 1 (or cosec(k) decreases).

0, 1, 2, 8, 14, 33, 322, 366, 699, 1409, 2119, 2829, 3539, 4249, 4959, 5669, 6379, 7089, 7799, 8509, 9219, 9929, 10639, 11349, 12059, 12769, 13479, 14189, 14899, 15609, 16319, 17029, 17739, 18449, 19159, 19869, 20579, 21289, 21999, 22709, 23419, 24129, 24839

(list; graph; refs; listen; history; text; internal format)

OFFSET

1,3

COMMENTS

sin(37362253) = 0.9999999999999996492283960073698922883715161030254...

LINKS

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

MATHEMATICA

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

DeleteDuplicates[Table[{n, Sin[n]}, {n, 0, 25000}], GreaterEqual[#1[[2]], #2[[2]]]&] [[All, 1]] (* Harvey P. Dale, May 14 2022 *)

CROSSREFS

Cf. A046964, A046965.