|
|
A218270
|
|
a(0)=1, a(1)=1, a(n) = a(n-2)^a(n-1)+1.
|
|
3
|
|
|
|
OFFSET
|
0,3
|
|
COMMENTS
|
The next term has roughly 1.7*10^23 digits.
|
|
LINKS
|
|
|
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
|
|
|
STATUS
|
approved
|
|
|
|