Location via proxy:   [ UP ]  
[Report a bug]   [Manage cookies]                
A046959
Numbers k where sin(k) increases monotonically to 1 (or cosec(k) decreases).
6
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
Sequence in context: A054598 A031160 A250554 * A086177 A299337 A332611
KEYWORD
nonn
STATUS
approved