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

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.

Sequence in context: A054598 A031160 A250554 * A086177 A299337 A332611

Adjacent sequences: A046956 A046957 A046958 * A046960 A046961 A046962

Keyword

nonn

Author

Olivier Gérard

Status

approved