|
|
A122891
|
|
Column sums of triangle A122890.
|
|
1
|
|
|
|
OFFSET
|
0,3
|
|
LINKS
|
|
|
PROG
|
(PARI) {A122890(n, k)=local(F=x+x^2, G=x+x*O(x^k)); if(n<0, 0, for(i=1, n, G=subst(F, x, G)); polcoeff(G, k, x))}
/* Takes first 2^m terms in column m of A122890 to compute a(m): */
{for(m=0, 8, print1(polcoeff(sum(N=1, 2^m, sum(n=0, 2^m, A122890(n, N)*x^n)*(1-x)^N+O(x^12)), m), ", "))}
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|