|
Search: id:A036717
|
|
|
| A036717 |
|
G.f. satisfies A(x) = 1 + x*cycle_index(Alt(4), A(x)). |
|
+0
22
|
|
| 1, 1, 1, 2, 4, 9, 19, 47, 113, 287, 733, 1920, 5064, 13557, 36553, 99455, 272293, 750262, 2077751, 5781971, 16156866, 45321635, 127566689, 360191846, 1019926954, 2895648896, 8240832570, 23505344031, 67183161970, 192393195097, 551946691853
(list; graph; listen)
|
|
|
OFFSET
|
0,4
|
|
|
MAPLE
|
A := 1; f := proc(n) global A; local A2, A3; A2 := subs(x=x^2, A); A3 := subs(x=x^3, A);
coeff(series( 1+x*( (A^4+3*A2^2+8*A*A3)/12), x, n+1), x, n); end;
for n from 1 to 50 do A := series(A+f(n)*x^n, x, n +1); od: A;
|
|
CROSSREFS
|
Sequence in context: A134964 A052328 A133228 this_sequence A000080 A153447 A076893
Adjacent sequences: A036714 A036715 A036716 this_sequence A036718 A036719 A036720
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
N. J. A. Sloane (njas(AT)research.att.com).
|
|
|
Search completed in 0.002 seconds
|
