A059406 a(n) = a(n-1)*(3a(n-1) + 1)/2 with a(1) = 1.
1, 2, 7, 77, 8932, 119675402, 21483302825630107, 692298450446589820159203790062227, 718915716736124071145150312487360788973317227637596552328693330407
Offset: 1
Keywords
Examples
a(3) = 7 so a(4) = 7*(3*7 + 1)/2 = 7*22/2 = 77.
Links
- Harry J. Smith, Table of n, a(n) for n = 1..12
Crossrefs
Cf. A000326.
Programs
-
Mathematica
f[n_Integer] := n(3n + 1)/2; NestList[f, 2, 8]
-
PARI
{ a=2/3; for (n = 1, 12, write("b059406.txt", n, " ", a=a*(3*a + 1)/2); ) } \\ Harry J. Smith, Jun 26 2009
Comments