A252583 a(n) = a(n-1)^3 + a(n-2)^6, a(0) = 0, a(1) = 1.
0, 1, 1, 2, 9, 793, 499208698, 124407462491481058208408441, 1925481259009966865844002992692350885969632796673886663638811207308483184039785
Offset: 0
Keywords
Programs
-
Mathematica
RecurrenceTable[{a[0]==0, a[1]==1, a[n] == a[n-1]^3 + a[n-2]^6}, a, {n, 0, 10}] nxt[{a_,b_}]:={b,b^3+a^6}; NestList[nxt,{0,1},10][[All,1]] (* Harvey P. Dale, Jul 22 2022 *)
Formula
a(n) ~ c^(3^n), where c = 1.0278548747403916038597317519446646178420852580529382519451043895427806227... . - Vaclav Kotesovec, Dec 18 2014