|
Search: id:A007696
|
|
|
| A007696 |
|
Quartic (or 4-fold) factorial numbers: a(n+1) = (4*n+1)(!^4) = product[ k=0..n-1 ] (4*k+1).
(Formerly M4001)
|
|
+0
44
|
|
| 1, 1, 5, 45, 585, 9945, 208845, 5221125, 151412625, 4996616625, 184874815125, 7579867420125, 341094033905625, 16713607661375625, 885821206052908125, 50491808745015763125, 3080000333445961550625, 200200021673987500790625
(list; graph; listen)
|
|
|
OFFSET
|
0,3
|
|
|
COMMENT
|
a(n), n>=1, enumerates increasing quintic (5-ary) trees. See a D. Callan comment on A007559 (number of increasing quarterny trees).
|
|
REFERENCES
|
N. J. A. Sloane and Simon Plouffe, The Encyclopedia of Integer Sequences, Academic Press, 1995 (includes this sequence).
Michael Z. Spivey and Laura L. Steil, The k-Binomial Transforms and the Hankel Transform, Journal of Integer Sequences, Vol. 9 (2006), Article 06.1.1.
|
|
LINKS
|
T. D. Noe, Table of n, a(n) for n=0..100
W. Lang, On generalizations of Stirling number triangles, J. Integer Seqs., Vol. 3 (2000), #00.2.4.
|
|
FORMULA
|
E.g.f.: (1-4*x)^(-1/4).
a(n) ~ 2^(5/2)*pi^(1/2)*Gamma(1/4)^-1*n^(3/4)*2^(2*n)*e^-n*n^n*{1 + 23/96*n^-1 - ...}. - Joe Keane (jgk(AT)jgk.org), Nov 23 2001
a(n) = Sum_{k=0..n} (-4)^(n-k)*A048994(n, k) .- Philippe DELEHAM (kolotoko(AT)wanadoo.fr), Oct 29 2005
|
|
MAPLE
|
restart: G(x):=(1-4*x)^(-1/4): f[0]:=G(x): for n from 1 to 29 do f[n]:=diff(f[n-1], x) od: x:=0: seq(f[n], n=0..17); # [From Zerinvary Lajos (zerinvarylajos(AT)yahoo.com), Apr 03 2009]
|
|
MATHEMATICA
|
s=1; lst={s}; Do[s+=n*s; AppendTo[lst, s], {n, 0, 5!, 4}]; lst [From Vladimir Orlovsky (4vladimir(AT)gmail.com), Nov 08 2008]
|
|
CROSSREFS
|
Cf. A001147, A007559, A034255, A004981, A047053, A001813, A051142. a(n)= A049029(n, 1), n >= 1 (first column of triangle).
Sequence in context: A121414 A097328 A051539 this_sequence A090136 A090356 A112940
Adjacent sequences: A007693 A007694 A007695 this_sequence A007697 A007698 A007699
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
N. J. A. Sloane (njas(AT)research.att.com).
|
|
EXTENSIONS
|
Better description from Wolfdieter Lang (wolfdieter.lang(AT)physik.uni-karlsruhe.de).
|
|
|
Search completed in 0.002 seconds
|
