|
Search: id:A124549
|
|
| |
|
| 1, 1, 5, 39, 399, 4943, 70846, 1142543, 20355695, 395414964, 8292073877, 186265497096, 4453789285009, 112771923093955, 3010597702761965, 84424863975107571, 2478907364772699611, 75998810193380960765
(list; graph; listen)
|
|
|
OFFSET
|
0,3
|
|
|
COMMENT
|
In table A124540, the g.f. of row n, R_n(y), simultaneously satisfies: R_n(y) = [ Sum_{k>=0} y^k*R_k(y)^n ]^n for n>=0.
|
|
FORMULA
|
a(n) = A124548(n)/(n+1).
|
|
PROGRAM
|
(PARI) {a(n)=local(R); R=vector(n+2, r, vector(n+2, c, if(r==1|c<=2, 1, r^(c-2)))); for(i=0, n+1, for(r=0, n+1, R[r+1]=Vec(sum(c=0, n, x^c*Ser(R[c+1])^(r*c)+O(x^(n+2)))))); Vec(Ser(R[n+2])^(n+1)+O(x^(n+2)))[n+1]/(n+1)}
|
|
CROSSREFS
|
Cf. A124540, A124548, A124547.
Sequence in context: A115187 A129763 A070767 this_sequence A024216 A127189 A121354
Adjacent sequences: A124546 A124547 A124548 this_sequence A124550 A124551 A124552
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
Paul D. Hanna (pauldhanna(AT)juno.com), Nov 05 2006
|
|
|
Search completed in 0.002 seconds
|
