|
|
A214669
|
|
a(n) = Sum_{k=1..n*(n+1)/2} k * A214670(n,k).
|
|
1
|
|
|
1, -4, 36, -720, 29264, -2370368, 379341376, -119616350464, 74306729686272, -91021121260127232, 220137897341768508416, -1052620193410626774192128, 9963741205378506824566067200, -186912918064963001770860269879296, 6955904583765468148520677987319955456
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,2
|
|
LINKS
|
|
|
PROG
|
(PARI) {a(n)=local(A214670=x*y); A214670=sum(m=1, n, -x^m*prod(j=1, m, (1-(1+y)^j)/(1-x*(1+y)^j))+x*O(x^n)); polcoeff(subst(deriv(A214670, y), y, 1), n, x)}
for(n=1, 25, print1(a(n), ", "))
|
|
CROSSREFS
|
|
|
KEYWORD
|
sign
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|