|
|
A118437
|
|
Row sums of triangle A118435.
|
|
3
|
|
|
1, 2, 0, 8, -32, -128, 320, 128, 2048, 8192, -15360, 2048, -131072, -524288, 1064960, 32768, 8388608, 33554432, -66846720, 524288, -536870912, -2147483648, 4299161600, 8388608, 34359738368, 137438953472, -274810798080, 134217728
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
0,2
|
|
LINKS
|
|
|
FORMULA
|
G.f.: (1+8*x^3-32*x^5+384*x^6-256*x^7)/(1-2*x)/(1+4*x^2)/(1+64*x^4).
|
|
MATHEMATICA
|
nmax = 27;
h[n_, k_] := Binomial[n, k]*(-1)^(Quotient[n+1, 2] - Quotient[k, 2]+n-k);
H = Table[h[n, k], {n, 0, nmax}, {k, 0, nmax}];
Cn = Table[Binomial[n, k], {n, 0, nmax}, {k, 0, nmax}];
|
|
PROG
|
(PARI) {a(n)=polcoeff((1+8*x^3-32*x^5+384*x^6-256*x^7)/(1-2*x)/(1+4*x^2)/(1+64*x^4+x*O(x^n)), n)}
|
|
CROSSREFS
|
|
|
KEYWORD
|
sign
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|