A322848 a(n) = floor(e^(e^n) - 1).

1, 14, 1617, 528491310, 514843556263457213182264, 28511235679461510605581038657982805983853648817939444953417128835

Offset: 0

Author

Greg Huber, Dec 28 2018

Keywords

• nonn
• easy

Comments

Analog of A051179 replacing 2 with e.

Crossrefs

Cf. A051179.

Programs

Mathematica

Table[Floor[E^(E^n)-1],{n,0,5}] (* Harvey P. Dale, Feb 05 2020 *)

PARI

default(realprecision, 10000);
A322848(n) = floor(exp(exp(n)))-1; \\ Antti Karttunen, Jan 17 2019