A056072 a(n) = floor(e^e^ ... ^e), with n e's.

1, 2, 15, 3814279

Offset

0,2

Comments

The next term is too large to include.

From Vladimir Reshetnikov, Apr 27 2013. (Start)

a(4) = 2331504399007195462289689911...2579139884667434294745087021 (1656521 decimal digits in total), given by initial segment of A085667.

a(5) has more than 10^10^6 decimal digits.

a(6) has more than 10^10^10^6 decimal digits. (end)

Links

Table of n, a(n) for n=0..3.

Maple

p:= n-> `if`(n=0, 1, exp(1)^p(n-1)):
a:= n-> floor(p(n)):
seq(a(n), n=0..3);  # Alois P. Heinz, Jul 20 2024

Mathematica

Floor[NestList[Exp, 1, 3]] (* Vladimir Reshetnikov, Apr 29 2013 *)

Prog

(PARI) A056072(n, f=floor)=f(exp(if(n>0, A056072(n-1, x->x))))  \\ [M. F. Hasler, May 01 2013]

Crossrefs

Cf. A001113, A004002, A003417, A064107, A159825, A073226, A073227, A085667, A225064, A225053.

Sequence in context: A290042 A080911 A175981 * A294195 A175982 A136666

Adjacent sequences: A056069 A056070 A056071 * A056073 A056074 A056075

Keyword

nonn,changed

Author

Robert G. Wilson v, Jul 26 2000

Status

approved