A081651 a(n) = floor((3/2)^^n), where x^^n is the power tower x^(x^(...^x)) with n x's.

1, 1, 1, 2, 2, 2, 2, 3, 3, 4, 5, 10, 86, 1499263005586576

Offset: 0

Author

Robert G. Wilson v, Mar 26 2003

Keywords

• nonn

Crossrefs

Cf. A014221.

Programs

Mathematica

f[n_] := (3/2)^n; Floor[ NestList[f, 3/2, 12]]

Extensions

New definition from Benoit Jubin, Jul 22 2008

Inserted a missing 1 at the beginning, Benoit Jubin, Aug 04 2008