A060402 Continued fraction expansion of tanh(Pi).
0, 1, 267, 4, 14, 1, 2, 1, 2, 2, 1, 2, 3, 8, 3, 1, 5, 4, 1, 14, 10, 1, 20, 38, 1, 2, 7, 5, 2, 1, 10, 1, 6, 1, 6, 1, 2, 3, 2, 1, 7, 1, 1, 5, 12, 2, 1, 1, 1, 2, 1, 1, 1, 34, 1, 8, 1, 33, 1, 4, 7, 1, 2, 56, 1, 3, 1, 34, 9, 1, 1, 7, 1, 3, 1, 7, 1, 4, 3, 1, 2, 14, 1, 10, 2, 51, 1, 6, 7, 17, 1, 14, 1, 8, 1, 1
Offset: 0
Examples
0.996272076220749944264690... = 0 + 1/(1 + 1/(267 + 1/(4 + 1/(14 + ...)))). - _Harry J. Smith_, Jul 04 2009
References
- J. M. Borwein, D. H. Bailey and R. Girgensohn, Experimentation in Mathematics, A K Peters, Ltd., Natick, MA, 2004. x+357 pp. See p. 11.
Links
- Harry J. Smith, Table of n, a(n) for n = 0..20000
Programs
-
Maple
with(numtheory): c := cfrac (tanh(Pi),300,'quotients');
-
Mathematica
ContinuedFraction[Tanh[Pi], 100] (* Paolo Xausa, Jul 04 2024 *)
-
PARI
{ allocatemem(932245000); default(realprecision, 21000); x=contfrac(tanh(Pi)); for (n=0, 20000, write("b060402.txt", n, " ", x[n+1])); } \\ Harry J. Smith, Jul 04 2009
Extensions
More terms from James Sellers, Apr 06 2001