|
|
A123228
|
|
Sum of the n-th powers of the roots of the polynomial x^6 + 14x^5 + 87x^4 + 148x^3 + 87x^2 + 14x + 1.
|
|
1
|
|
|
6, -14, 22, 466, -6714, 51346, -205418, -638414, 19787526, -195455054, 1126500502, -1636604654, -47878102074, 662684162386, -4965254864618, 19072814136946, 71067700116486, -1976406503675534, 19086772122105622, -107375947452919214, 128777308208472006, 4884916184617735186
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
0,1
|
|
LINKS
|
|
|
FORMULA
|
G.f.: 2*(7*x^4+80*x^3+142*x^2+32*x+3)/((x+1)*(x^4+12*x^3+62*x^2+12*x+1)).
|
|
MAPLE
|
Newt:=proc(f) local t1, t2, t3, t4; t1:=f; t2:=diff(f, x); t3:=expand(x^degree(t1, x)*subs(x=1/x, t1)); t4:=expand(x^degree(t2, x)*subs(x=1/x, t2)); factor(t4/t3); end;
t1:=1+14*x+87*x^2+148*x^3+87*x^4+14*x^5+x^6; Newt(t1); series(t1, x, 50);
|
|
PROG
|
|
|
CROSSREFS
|
|
|
KEYWORD
|
sign,easy
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|