A094690 Continued fraction expansion of (1+(+1+ ... )^(1/e))^(1/e))^(1/e)).

1, 2, 1, 2, 37, 17, 4, 4, 6, 11, 25, 2, 1, 2, 1, 9, 1, 2, 1, 13, 4, 1, 2, 3, 1, 1, 8, 1, 3, 1, 2, 1, 1, 2, 2, 1, 1, 2, 1, 1, 1, 3, 1, 7, 2, 1, 3, 1, 1, 9, 2, 1, 1, 5, 6, 5, 1, 2, 10, 1, 1, 1, 5, 1, 1, 2, 8, 1, 6, 1, 1, 2, 2, 1, 3, 1, 1, 1, 4, 30, 1, 4, 66, 1, 2, 76, 4, 6, 1, 1, 9, 3, 1, 1, 1, 28, 1, 11, 1, 2

Offset

1,2

Comments

Increasing partial quotients are: 1,2,37,66,76,84,145,686,983,2434,5120

Links

Table of n, a(n) for n=1..100.

Mathematica

f[n_] := N[(n + 1)^(1/E), 1024]; ContinuedFraction[ Nest[f, 1, 2500], 100]

Crossrefs

Cf. A094689.

Sequence in context: A155796 A341530 A141238 * A010249 A228005 A177438

Adjacent sequences: A094687 A094688 A094689 * A094691 A094692 A094693

Keyword

cofr,nonn

Author

Robert G. Wilson v, May 18 2004

Status

approved