|
| |
|
|
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; internal format)
|
|
|
|
OFFSET
| 0,3
|
|
|
FORMULA
| a(n) = A107946(2^n).
|
|
|
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
| Cf. A107946, A107947.
Sequence in context: A006116 A122082 A002631 * A058673 A059295 A129092
Adjacent sequences: A107945 A107946 A107947 * A107949 A107950 A107951
|
|
|
KEYWORD
| nonn
|
|
|
AUTHOR
| Paul D. Hanna (pauldhanna(AT)juno.com), May 28 2005
|
| |
|
|
