|
Search: id:A126267
|
|
| |
|
| 1, 6, 24, 140, 1320, 12432, 121072, 1420848, 19012320, 267512300, 4002574224, 64842612276, 1121345413552, 20409576486600, 390729145716480, 7869294632279648, 166020221631955680, 3654120873937484628
(list; graph; listen)
|
|
|
OFFSET
|
0,2
|
|
|
COMMENT
|
a(n) is divisible by (n+1)*(n+2)/2. Rows of triangle A126265 lists coefficients of q in e.g.f. that satisfies: W(x,q) = exp( q*x*W(q*x,q) ).
|
|
PROGRAM
|
(PARI) {a(n)=local(W=x); for(i=1, n+2, W=x*exp(subst(W, x, q*x+x*O(x^(n+2))))); if(n<0, 0, Vec(Vec(W)[n+3]*(n+2)!+q*O(q^((n+2)*(n+3)/2)))[n+1])}
|
|
CROSSREFS
|
Cf. A126265, A126266.
Sequence in context: A027224 A110707 A047712 this_sequence A026947 A165491 A165638
Adjacent sequences: A126264 A126265 A126266 this_sequence A126268 A126269 A126270
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
Paul D. Hanna (pauldhanna(AT)juno.com), Dec 22 2006
|
|
|
Search completed in 0.002 seconds
|
