A048122 a(1) = 1, a(2) = 2, a(n) = a(n-1)^3 - a(n-2)^3.
1, 2, 7, 335, 37595032, 53136308104856854277393, 150028625136232090492356612601560283583272160844416809510162344944689
Offset: 1
Crossrefs
Cf. A048112.
Programs
-
Mathematica
RecurrenceTable[{a[1]==1,a[2]==2,a[n]==a[n-1]^3-a[n-2]^3},a,{n,8}] (* Harvey P. Dale, Mar 20 2013 *)
Extensions
More terms from Patrick De Geest, Jun 15 1999
Comments