[go: up one dir, main page]
More Web Proxy on the site http://driver.im/
login

Year-end appeal: Please make a donation to the OEIS Foundation to support ongoing development and maintenance of the OEIS. We are now in our 61st year, we have over 378,000 sequences, and we’ve reached 11,000 citations (which often say “discovered thanks to the OEIS”).

A002794
Numerators of convergents to Lehmer's constant.
(Formerly M3034 N1230)
5
1, 1, 3, 16, 547, 538811, 620245817465, 692770666469127829226736, 1025344764595988314871439243086711931108916434521
OFFSET
0,3
REFERENCES
D. H. Lehmer, A cotangent analogue of continued fractions, Duke Math. J., 4 (1935), 323-340.
N. J. A. Sloane, A Handbook of Integer Sequences, Academic Press, 1973 (includes this sequence).
N. J. A. Sloane and Simon Plouffe, The Encyclopedia of Integer Sequences, Academic Press, 1995 (includes this sequence).
J. W. Wrench, Jr., personal communication.
LINKS
D. H. Lehmer, A cotangent analogue of continued fractions, Duke Math. J., 4 (1935), 323-340. [Annotated scanned copy]
MATHEMATICA
Block[{$MaxExtraPrecision=1000}, Numerator[Convergents[With[{nn=15}, Cot[ Total[Last[#] ArcCot[First[#]]&/@Thread[{NestList[#^2+#+1&, 0, nn], PadRight[{}, nn+1, {1, -1}]}]]]], 10]]] (* Harvey P. Dale, Jan 29 2012 *)
CROSSREFS
KEYWORD
nonn,frac,nice
STATUS
approved