login
A218270
a(0)=1, a(1)=1, a(n) = a(n-2)^a(n-1)+1.
3
1, 1, 2, 2, 5, 33, 116415321826934814453126
OFFSET
0,3
COMMENTS
The next term has roughly 1.7*10^23 digits.
EXAMPLE
a(2) = a(0)^a(1)+1 = 1+1 = 2.
MATHEMATICA
nxt[{a_, b_}]:={b, a^b+1}; Join[{1}, NestList[nxt, {1, 1}, 5][[All, 2]]] (* Harvey P. Dale, Nov 25 2016 *)
PROG
(Maxima)
a[0]:1$
a[1]:1$
a[n]:=a[n-2]^a[n-1]+1$
makelist(a[n], n, 1, 6); /* Martin Ettl, Oct 29 2012 */
CROSSREFS
KEYWORD
nonn
AUTHOR
Nico Brown, Oct 24 2012
STATUS
approved