login
The OEIS is supported by the many generous donors to the OEIS Foundation.

 

Logo
Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A046955 Numbers k such that sec(k) decreases monotonically to 1 (or cos(k) increases to 1). 5
1, 6, 19, 25, 44, 333, 710, 103993, 312689, 1980127, 2292816, 4272943, 10838702, 80143857, 411557987, 2137933792, 2549491779, 12335900908, 14885392687, 42106686282, 1783366216531, 8958937768937, 279510437053578, 288469374822515, 567979811876093 (list; graph; refs; listen; history; text; internal format)
OFFSET
1,2
COMMENTS
Also numerators of convergents to 2*Pi. - Vladeta Jovovic, Nov 09 2004
LINKS
EXAMPLE
cos(411557987) = 0.999999999999999996782535835854909099962858791940...
MATHEMATICA
a = 0; Do[ If[ Cos[n] > a, Print[n]; a = Cos[n]], {n, 1, 421000000}] (* 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}] (* Robert G. Wilson v, Dec 29 2003 *)
Join[{1}, Numerator[Convergents[2Pi, 33]]] (* Stéphane Mottelet, Oct 12 2011 *)
CROSSREFS
Cf. A046947.
Cf. A242859 (denominators).
Sequence in context: A009048 A294313 A235537 * A042215 A041911 A341327
KEYWORD
nonn,frac
AUTHOR
EXTENSIONS
More terms from Michel ten Voorde
One more term from Vladeta Jovovic, Apr 03 2000
8 more terms from Vladeta Jovovic, Nov 09 2004
More terms from Stéphane Mottelet, Oct 12 2011
Definition corrected by N. J. A. Sloane, Mar 16 2018 following a suggestion from Allan C. Wechsler.
STATUS
approved

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recents
The OEIS Community | Maintained by The OEIS Foundation Inc.

License Agreements, Terms of Use, Privacy Policy. .

Last modified March 18 22:56 EDT 2024. Contains 370952 sequences. (Running on oeis4.)