|
| |
| |
|
|
|
1, 2, 3, 28, 245, 1626, 15127, 190968, 2389977, 30873790, 448821131, 7114224756, 118167143965, 2069398819502, 38512533444855, 755518153347376, 15502607812688529, 332330062063140054, 7436822666078492083
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 0,2
|
|
|
COMMENTS
| a(n) is divisible by (n+1). Rows of triangle A126265 lists coefficients of q in e.g.f. that satisfies: W(x,q) = exp( q*x*W(q*x,q) ).
|
|
|
PROG
| (PARI) {a(n)=local(W=x); for(i=1, n+1, W=x*exp(subst(W, x, q*x+x*O(x^(n+1))))); if(n<0, 0, Vec(Vec(W)[n+2]*(n+1)!+q*O(q^((n+1)*(n+2)/2)))[n+1])}
|
|
|
CROSSREFS
| Cf. A126265, A126267.
Sequence in context: A001094 A052848 A206592 * A206591 A003017 A096580
Adjacent sequences: A126263 A126264 A126265 * A126267 A126268 A126269
|
|
|
KEYWORD
| nonn
|
|
|
AUTHOR
| Paul D. Hanna (pauldhanna(AT)juno.com), Dec 22 2006
|
| |
|
|
