A096232 - OEIS

%I #19 Feb 14 2025 08:56:04

%S 1,1,1,1,1,2,15,1618,528491311,514843556263457213182265,

%T 28511235679461510605581038657982805983853648817939444953417128836

%N a(n) = floor(e^(e^n)).

%C The next term is too large to show above.

%C From _Peter Munn_, Feb 13 2025: (Start)

%C The underlying function continues similarly to any negative value.

%C Equivalently, a(n) = k-1, where k is the least k such that log(log(k)) > n.

%C (End)

%F a(n) = A096404(n) - 1. - _Peter Munn_, Feb 13 2025

%t $MaxExtraPrecision = 128; Table[ Floor[ Exp[ Exp[ n]]], {n, -5, 6}] (* _Robert G. Wilson v_, Jan 07 2007 *)

%o (PARI) default(realprecision,10000);for(n=-5,5,print1(floor(exp(exp(n))),",")) \\ _Edward Jiang_, Sep 06 2014

%Y Cf. A001113, A016066, A096404.

%K nonn

%O -5,6

%A _N. J. A. Sloane_, Aug 15 2004

%E Terms prepended for search purposes by _Peter Munn_, Feb 13 2025