login
The OEIS Foundation is supported by donations from users of the OEIS and by a grant from the Simons Foundation.

 

Logo


Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A002665 Continued fraction expansion of Lehmer's constant.
(Formerly M1549 N0605)
7
0, 1, 1, 2, 5, 34, 985, 1151138, 1116929202845, 1480063770341062927127746, 1846425204836010506550936273411258268076151412465 (list; graph; refs; listen; history; text; internal format)
OFFSET

0,4

REFERENCES

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).

LINKS

Harry J. Smith, Table of n, a(n) for n = 0..12

D. H. Lehmer, A cotangent analogue of continued fractions, Duke Math. J., 4 (1935), 323-340.

D. H. Lehmer, A cotangent analogue of continued fractions, Duke Math. J., 4 (1935), 323-340. [Annotated scanned copy]

G. Xiao, Contfrac

Index entries for continued fractions for constants

FORMULA

With a different offset: a(0)=1, a(1)=1, a(n+1)=(b(n)+b(n-1)+1)*a(n-1), n >= 1, b()=A002065, with b(0)=0, b(1)=1, b(2)=3, ...

EXAMPLE

0.592632718201636... = 0 + 1/(1 + 1/(1 + 1/(2 + 1/(5 + ...)))). - Harry J. Smith, May 14 2009

MATHEMATICA

digits = 1200; c[0] = 0; c[n_] := c[n] = c[n-1]^2 + c[n-1] + 1; LC[m_] := LC[m] = Cot[Sum[(-1)^k*ArcCot[c[k]], {k, 0, m}]] // N[#, digits+10]&; LC[10]; LC[m = 20]; While[Abs[LC[m] - LC[m-10]] > 10^-digits, m = m+10]; ContinuedFraction[LC[m]] (* Jean-Fran├žois Alcover, Oct 08 2013 *)

PROG

(PARI) default(realprecision, 2000); b=0.;

Lehmers=1/tan(suminf(k=1, b=b^2+b+1; (-1)^k*atan(1/b))+Pi/2);

x=contfrac(Lehmers);

for (n=1, 13, write("b002665.txt", n-1, " ", x[n])) \\ Harry J. Smith, May 14 2009; edited by Charles R Greathouse IV, Jan 21 2016

CROSSREFS

Cf. A030125 (decimal expansion).

Cf. A002794, A002795, A002665, A002065.

Starting with n=2, a(n)/a(n-2) are in A096407.

Sequence in context: A283111 A206830 A277436 * A192222 A326946 A241586

Adjacent sequences:  A002662 A002663 A002664 * A002666 A002667 A002668

KEYWORD

nonn,cofr,nice,easy

AUTHOR

N. J. A. Sloane

EXTENSIONS

More terms from Jeffrey Shallit

First two terms inserted by Harry J. Smith, May 14 2009

STATUS

approved

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recent
The OEIS Community | Maintained by The OEIS Foundation Inc.

License Agreements, Terms of Use, Privacy Policy. .

Last modified April 7 13:27 EDT 2020. Contains 333305 sequences. (Running on oeis4.)