(MAGMAMagma) R<x>:=PowerSeriesRing(Integers(), 20); Coefficients(R!( 1/((1-16*x)^2*(1-14*x+56*x^2-64*x^3)) )); // G. C. Greubel, May 28 2019
(MAGMAMagma) R<x>:=PowerSeriesRing(Integers(), 20); Coefficients(R!( 1/((1-16*x)^2*(1-14*x+56*x^2-64*x^3)) )); // G. C. Greubel, May 28 2019
proposed
approved
editing
proposed
Expansion of 1/((1-16*x)^2*(1 - 14*x + 56*x^2 - 64*x^3)).
E.g.f.: (3 - 98*exp(2*x) + 1176*exp(6*x) + 128*(-5 + 168*x)*exp(14*x) )*exp(2*x)/441. (End)
proposed
editing
editing
proposed
Expansion of 1/((1-16*x-1)^2*(1-14*x+56*x^2-64*x^3)).
The original o.g.f. was transferred to a new sequence A308436.
G. C. Greubel, <a href="/A028574/b028574.txt">Table of n, a(n) for n = 0..820</a>
From G. C. Greubel, May 28 2019: (Start)
a(n) = 2^n*(3 - 49*2^(n+1) + 147*2^(2*n+3) + (21*n -10)*2^(3*n+6))/441.
E.g.f.: (3 - 98*exp(2*x) + 1176*exp(6*x) + 128*(-5 + 168*x)*exp(14*x) )*exp(2*x)/441. (End)
CoefficientList[Series[1/((1-16*x)^2*(1-14*x+56*x^2-64*x^3)), {x, 0, 20}], x] (* G. C. Greubel, May 28 2019 *)
(PARI) my(x='x+O('x^20)); Vec(1/((1-16*x)^2*(1-14*x+56*x^2-64*x^3))) \\ G. C. Greubel, May 28 2019
(MAGMA) R<x>:=PowerSeriesRing(Integers(), 20); Coefficients(R!( 1/((1-16*x)^2*(1-14*x+56*x^2-64*x^3)) )); // G. C. Greubel, May 28 2019
(Sage) (1/((1-16*x)^2*(1-14*x+56*x^2-64*x^3))).series(x, 20).coefficients(x, sparse=False) # G. C. Greubel, May 28 2019
G.f. corrected by Georg Fischer, May 27 2019
proposed
editing
editing
proposed
Expansion of 1/((16x16*x-1)^2*(1-14x14*x+56x56*x^2-64x64*x^3)).
proposed
editing
editing
proposed
proposed
editing