|
| |
| |
|
|
|
1, 2, 12, 130, 2075, 44196, 1183492, 38254712, 1449394470, 62974889140, 3085705347128, 168283580164356, 10107641429213386, 662869582493716400, 47124829795282593000, 3609674673146922124600, 296355186635275737517175
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
|
OFFSET
|
0,2
|
|
|
COMMENTS
|
|
|
|
LINKS
|
|
|
|
FORMULA
|
|
|
|
PROG
|
(PARI) {a(n)=local(A); if(n<1, 0, A=1+x+x*O(x^n); for(k=1, n, B=subst(A^5, x, x/(1-x))/(1-x)+x*O(x^n); A=A-A^6+B); B=subst(A^3, x, x/(1-x))/(1-x)+x*O(x^n); polcoeff(B^(1/2), n, x))}
|
|
|
CROSSREFS
|
|
|
|
KEYWORD
|
nonn
|
|
|
AUTHOR
|
|
|
|
STATUS
|
approved
|
| |
|
|
