|
Search: id:A046955
|
|
|
| A046955 |
|
Numbers n such that sec(n) decreases monotonically to 0 (or cos(n) increases to 1). |
|
+0 1
|
|
| 1, 6, 19, 25, 44, 333, 710, 103993, 312689, 1980127, 2292816, 4272943, 10838702, 80143857, 411557987, 2137933792, 2549491779, 12335900908, 14885392687, 42106686282, 1783366216531, 8958937768937, 279510437053578
(list; graph; listen)
|
|
|
OFFSET
|
1,2
|
|
|
COMMENT
|
Also numerators of convergents to 2*Pi - 8 more terms from Vladeta Jovovic (vladeta(AT)Eunet.yu), Nov 09 2004
|
|
EXAMPLE
|
cos(411557987) = 0.999999999999999996782535835854909099962858791940...
|
|
MATHEMATICA
|
a = 0; Do[ If[ Cos[n] > a, Print[n]; a = Cos[n]], {n, 1, 421000000}] (* Or *) (from Robert G. Wilson v Dec 29 2003)
b = 10; Do[ If[ Abs[ Mod[n + Pi/2, 2Pi] - Pi/2] < b, Print[n]; b = Abs[ Mod[n + Pi/2, 2Pi] - Pi/2]], {n, 1, 421000000}] (from Robert G. Wilson v Dec 29 2003)
|
|
CROSSREFS
|
Cf. A046947.
Sequence in context: A130904 A012589 A009048 this_sequence A042215 A041911 A038125
Adjacent sequences: A046952 A046953 A046954 this_sequence A046956 A046957 A046958
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
Olivier Gerard (ogerard(AT)ext.jussieu.fr)
|
|
EXTENSIONS
|
More terms from Michel ten Voorde (seqfan(AT)tenvoorde.org) One more term from Vladeta Jovovic (vladeta(AT)Eunet.yu), Apr 03 2000.
8 more terms from Vladeta Jovovic (vladeta(AT)Eunet.yu), Nov 09 2004
|
|
|
Search completed in 0.002 seconds
|