|
| |
|
|
A122993
|
|
G.f.: A(x) = Product_{n>=0} 1/( 1 - x/(1-x)^n )^( 1/2^(n+1) ).
|
|
2
|
|
|
|
1, 1, 2, 5, 14, 43, 145, 538, 2194, 9796, 47635, 250811, 1421509, 8623112, 55693506, 381175374, 2753122695, 20909082797, 166448275680, 1385010594903, 12016912542681, 108481226052096, 1016937780320981, 9882191461530141
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
|
OFFSET
|
0,3
|
|
|
LINKS
|
Table of n, a(n) for n=0..23.
D. Callan, A permutation pattern that illustrates the strong law of small numbers, arXiv:1111.6297
|
|
|
EXAMPLE
|
A(x) = (1-x)^(-1/2) * (1 - x/(1-x))^(-1/4) * (1 - x/(1-x)^2)^(-1/8) * (1 - x/(1-x)^3)^(-1/16) * ...
|
|
|
PROG
|
(PARI) {a(n)=round(polcoeff(prod(i=0, 6*n+10, 1/(1-x/(1-x)^i +x*O(x^n))^(1/2^(i+1))), n))}
(PARI) {a(n)=local(A); if(n<0, 0, A=1+O(x); for(k=1, n, A=truncate(A)+x*O(x^k); A+=substvec(A, [x, y], [x/(1-x*y+O(x^k)), y*(1-x*y)]) -A^2*(1-x)); subst(polcoeff(A, n), y, 1))} /* Michael Somos Oct 21 2006 */
|
|
|
CROSSREFS
|
Cf. A122992.
Sequence in context: A137551 A148333 A201497 * A137552 A137553 A149881
Adjacent sequences: A122990 A122991 A122992 * A122994 A122995 A122996
|
|
|
KEYWORD
|
nonn
|
|
|
AUTHOR
|
Paul D. Hanna, Sep 23 2006
|
|
|
STATUS
|
approved
|
| |
|
|
