|
|
A134048
|
|
a(n) = [x^n] G(x)^( 2^(n+2) ) / 4^n, where G(x) is the g.f. of A134046 such that G(x) satisfies: [x^n] G(x)^(2^n) = 4^n for n>=0.
|
|
0
|
|
|
1, 4, 28, 548, 35108, 7507972, 5383397764, 13122109416964, 110735166982705668, 3291956693540520243204, 349880644048154072353961988, 134569675810924626719483447943172
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
0,2
|
|
LINKS
|
|
|
PROG
|
(PARI) {a(n)=local(A=[]); for(i=0, n, A=concat(A, 0); A[i+1]=(4^i - Vec(Ser(A)^(2^i))[i+1])/2^i); Vec(Ser(A)^(2^(n+2)))[n+1]/4^n}
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|