OFFSET
0,1
LINKS
Index entries for linear recurrences with constant coefficients, signature (-13,-74,-74,-13,-1).
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
(PARI) polsym(x^6 + 14*x^5 + 87*x^4 + 148*x^3 + 87*x^2 + 14*x + 1, 30) \\ Charles R Greathouse IV, Jul 20 2016
CROSSREFS
KEYWORD
sign,easy
AUTHOR
N. J. A. Sloane, Nov 12 2006
STATUS
approved