A046965 Cos(a(n)) decreases monotonically to -1.
1, 2, 3, 22, 355, 104348, 208341, 521030, 833719, 1146408, 5419351, 85563208, 165707065, 245850922, 657408909, 1068966896, 3618458675, 6167950454, 21053343141, 1804419559672, 3587785776203, 5371151992734, 14330089761671, 130796280757852
Offset: 1
Keywords
Crossrefs
Cf. A001203 for the continued fraction for Pi.
Programs
-
Mathematica
z={}; current=1; Timing[ Do[ If[ Cos[ n ]
Extensions
More terms from Michel ten Voorde
Terms a(13) and beyond and comments from Jonathan Cross (jcross(AT)wcox.com), Oct 16 2001
Offset changed to 1 by Alois P. Heinz, Apr 12 2019
Comments