OFFSET
0,3
LINKS
MATHEMATICA
CoefficientList[Series[(1-x)/(1-2x-2x^2-3x^3), {x, 0, 30}], x] (* or *) LinearRecurrence[{2, 2, 3}, {1, 1, 4}, 30] (* Harvey P. Dale, Sep 21 2016 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
N. J. A. Sloane, Nov 17 2002
STATUS
approved