|
| |
|
|
A047657
|
|
Sextuple factorial numbers: product[ k=0..n-1 ] (6*k+2).
|
|
14
| |
|
|
1, 2, 16, 224, 4480, 116480, 3727360, 141639680, 6232145920, 311607296000, 17450008576000, 1081900531712000, 73569236156416000, 5444123475574784000, 435529878045982720000, 37455569511954513920000
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 0,2
|
|
|
FORMULA
| E.g.f. (1-6*x)^(-1/3)
a(n) = 2^n*A007559(n).
a(n) = A084941(n)/A000142(n)*A000079(n) = 6^n*pochhammer(1/3, n) = 1/2*6^n*GAMMA(n+1/3)*sqrt(3)*GAMMA(2/3)/Pi - Daniel Dockery (peritus(AT)gmail.com) Jun 13, 2003
Let b(n)=b(n-1)+6; then a(n)=b(n)*a(n-1). - Roger L. Bagula (rlbagulatftn(AT)yahoo.com), Sep 17 2008
G.f.: 1/(1-2x/(1-6x/(1-8x/(1-12x/(1-14x/(1-18x/(1-20x/(1-24x/(1-26x/(1-... (continued fraction). - DELEHAM Philippe, Jan 08 2012
|
|
|
MATHEMATICA
| k = 6; b[1] = 2; b[n_] := b[n] = b[n - 1] + k; a[0] = 1; a[1] = 2; a[n_] := a[n] = a[n - 1]*b[n]; Table[a[n], {n, 0, 20}] - Roger L. Bagula (rlbagulatftn(AT)yahoo.com), Sep 17 2008
s=1; lst={s}; Do[s+=n*s; AppendTo[lst, s], {n, 1, 5!, 6}]; lst [From Vladimir Orlovsky (4vladimir(AT)gmail.com), Nov 08 2008]
|
|
|
CROSSREFS
| Cf. A007559, A008542, A011781.
Cf. A000165, A008544, A001813, A047055, A084947, A084948, A084949.
Sequence in context: A188688 A188844 A187657 * A188500 A188515 A152542
Adjacent sequences: A047654 A047655 A047656 * A047658 A047659 A047660
|
|
|
KEYWORD
| nonn,easy
|
|
|
AUTHOR
| Joe Keane (jgk(AT)jgk.org)
|
| |
|
|
