[go: up one dir, main page]

login
A002667
Continued cotangent for Pi.
(Formerly M3171 N1286)
19
3, 73, 8599, 400091364, 371853741549033970, 253461181173408820488703379557217678
OFFSET
0,1
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).
LINKS
D. H. Lehmer, A cotangent analogue of continued fractions, Duke Math. J., 4 (1935), 323-340. [Annotated scanned copy]
PROG
(PARI) { default(realprecision, 10000); bn=vector(10); bn[1]=Pi; for(n=2, 10, bn[n]=(bn[n-1]*floor(bn[n-1]) + 1)/(bn[n-1] - floor(bn[n-1]))); for (n=1, 10, write("b002667.txt", n-1, " ", floor(bn[n]))); } \\ Harry J. Smith, May 04 2009
CROSSREFS
Sequence in context: A119017 A364116 A307232 * A145675 A373784 A336873
KEYWORD
nonn
EXTENSIONS
More terms from Jeffrey Shallit
STATUS
approved