|
| |
|
|
A030125
|
|
Decimal expansion of Lehmer's constant.
|
|
6
| |
|
|
5, 9, 2, 6, 3, 2, 7, 1, 8, 2, 0, 1, 6, 3, 6, 1, 9, 7, 1, 0, 4, 0, 7, 8, 6, 0, 4, 9, 9, 5, 7, 0, 1, 4, 6, 9, 0, 8, 4, 2, 7, 5, 4, 0, 7, 1, 9, 7, 1, 6, 1, 0, 7, 1, 0, 9, 9, 5, 6, 2, 6, 0, 8, 1, 5, 8, 2, 4, 7, 3, 5, 2, 3, 6, 4, 1, 6, 0, 0, 0, 8, 5, 1, 0, 6, 6, 4, 7, 8, 4, 2, 9, 7, 1, 0, 1, 2, 5, 7, 0, 5, 1, 1, 8
(list; constant; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 0,1
|
|
|
REFERENCES
| S. R. Finch, Mathematical Constants, Cambridge, 2003, pp. 433-434.
|
|
|
LINKS
| Harry J. Smith, Table of n, a(n) for n=0,...,998
S. R. Finch, Lehmer's Constant
S. Plouffe, The Lehmer Constant to 1000 digits
S. Plouffe, Plouffe's Inverter, The Lehmer constant to 1000 digits
Eric Weisstein's World of Mathematics, Link to a section of The World of Mathematics.
|
|
|
EXAMPLE
| 0.592632718201636197104078604995701469084275407197161...
|
|
|
MATHEMATICA
| RealDigits[With[{nn=15}, Cot[Total[Last[#]ArcCot[First[#]]&/@Thread[ {NestList[#^2+#+1&, 0, nn], PadRight[{}, nn+1, {1, -1}]}]]]], 10, 120][[1]] (* From Harvey P. Dale, Jan 29 2012 *)
|
|
|
CROSSREFS
| Cf. A002794, A002795, A002665, A030125, A002065.
Cf. A002665 = Continued fraction. [From Harry J. Smith (hjsmithh(AT)sbcglobal.net), May 14 2009]
Sequence in context: A198734 A200009 A011494 * A111698 A021948 A154265
Adjacent sequences: A030122 A030123 A030124 * A030126 A030127 A030128
|
|
|
KEYWORD
| nonn,cons,nice
|
|
|
AUTHOR
| Eric Weisstein (eric(AT)weisstein.com)
|
|
|
EXTENSIONS
| More terms from David W. Wilson (davidwwilson(AT)comcast.net)
|
| |
|
|
