|
| |
|
|
A002794
|
|
Numerators of convergents to Lehmer's constant.
(Formerly M3034 N1230)
|
|
6
| | |
|
|
|
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.
|
|
|
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]]] (* From Harvey P. Dale, Jan 29 2012 *)
|
|
|
CROSSREFS
| Cf. A002794, A002795, A002665, A030125, A002065.
Sequence in context: A081782 A176299 A081780 * A132559 A080273 A096404
Adjacent sequences: A002791 A002792 A002793 * A002795 A002796 A002797
|
|
|
KEYWORD
| nonn,frac,nice
|
|
|
AUTHOR
| N. J. A. Sloane (njas(AT)research.att.com).
|
| |
|
|
