OFFSET
0,4
LINKS
G. C. Greubel, Table of n, a(n) for n = 0..1000
FORMULA
MAPLE
MATHEMATICA
CoefficientList[Series[(x (1 - 4 x)^(3/2))/(3 x - 1)^2, {x, 0, 28}], x]
PROG
(PARI) x='x+O('x^30); concat([0], Vec(x*(1-4*x)^(3/2)/(1-3*x)^2)) \\ G. C. Greubel, Oct 27 2018
(Magma) m:=30; R<x>:=PowerSeriesRing(Rationals(), m); [0] cat Coefficients(R!(x*(1-4*x)^(3/2)/(1-3*x)^2)); // G. C. Greubel, Oct 27 2018
CROSSREFS
KEYWORD
sign
AUTHOR
Peter Luschny, Oct 22 2018
STATUS
approved