This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.
%I A002794 M3034 N1230 #25 Oct 13 2024 01:26:54 %S A002794 1,1,3,16,547,538811,620245817465,692770666469127829226736, %T A002794 1025344764595988314871439243086711931108916434521 %N A002794 Numerators of convergents to Lehmer's constant. %D A002794 D. H. Lehmer, A cotangent analogue of continued fractions, Duke Math. J., 4 (1935), 323-340. %D A002794 N. J. A. Sloane, A Handbook of Integer Sequences, Academic Press, 1973 (includes this sequence). %D A002794 N. J. A. Sloane and Simon Plouffe, The Encyclopedia of Integer Sequences, Academic Press, 1995 (includes this sequence). %D A002794 J. W. Wrench, Jr., personal communication. %H A002794 D. H. Lehmer, <a href="/A002065/a002065_1.pdf">A cotangent analogue of continued fractions</a>, Duke Math. J., 4 (1935), 323-340. [Annotated scanned copy] %H A002794 J. W. Wrench, Jr., <a href="/A002065/a002065_2.pdf">Letters to N. J. A. Sloane, Feb 1974</a> %t A002794 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 *) %Y A002794 Cf. A002795, A002665, A030125, A002065. %K A002794 nonn,frac,nice %O A002794 0,3 %A A002794 _N. J. A. Sloane_