login
A160814
a(1) = 1; a(n+1) = a(n)^n + n^a(n).
0
1, 2, 8, 7073
OFFSET
1,2
COMMENTS
Next term is too large to display: 2.3459495195697547514*10^4258
The next term (a(5)) has 4259 digits. - Harvey P. Dale, Jul 18 2021
MATHEMATICA
a=1; lst={}; Do[a=a^n+n^a; AppendTo[lst, IntegerPart[a]], {n, 0, 4}]; lst
nxt[{n_, a_}] := {n + 1, a^n + n^a}; NestList[nxt, {1, 1}, 4][[All, 2]] (* Harvey P. Dale, Jul 18 2021 *)
CROSSREFS
Cf. A093898, A055652, A076980. - R. J. Mathar, May 29 2009
Sequence in context: A135238 A133376 A179056 * A038582 A309860 A058437
KEYWORD
nonn
AUTHOR
EXTENSIONS
Edited by N. J. A. Sloane, May 29 2009
STATUS
approved