A112981 a(1) = a(2) = a(3) = 1; for n>3: a(n) = a(n-1)^3 + a(n-2)^3 + a(n-3)^3.
1, 1, 1, 3, 29, 24417, 14557168544129, 3084826414596074361107793217201624802791
Offset: 1
Examples
a(6) = 1^3 + 3^3 + 29^3 = 24417.
Programs
-
Mathematica
RecurrenceTable[{a[1]==a[2]==a[3]==1,a[n]==a[n-1]^3+a[n-2]^3+a[n-3]^3},a,{n,10}] (* Harvey P. Dale, Jan 25 2018 *)
Comments