|
|
A107948
|
|
Terms at positions 2^n of A107946 for n>=0.
|
|
4
|
|
|
1, 1, 2, 5, 16, 68, 399, 3348, 41417, 775234, 22445788, 1024347395, 74876701760, 8888457145166, 1734062627778860
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
0,3
|
|
LINKS
|
|
|
FORMULA
|
|
|
PROG
|
(PARI) {a(n)=local(A=[1, 1], B=[1]); for(i=1, n-1, B=concat(B, vector(#B, k, polcoeff(Ser(A)/(1-x), #B+k-1))); A=concat(A, B); ); A[2^(n-1)]}
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|