OFFSET
0,2
MATHEMATICA
With[{c=(1-Sqrt[1-4x])/(2x)}, CoefficientList[Series[(1+x^4*c)c^3, {x, 0, 30}], x]] (* Harvey P. Dale, May 30 2016 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
N. J. A. Sloane, Jun 06 2002
STATUS
approved