OFFSET
0,12
MATHEMATICA
nmax = 70; CoefficientList[Series[1/(1 + x + x^2 + ContinuedFractionK[x^(3 k - 3), 1 + x^(3 k - 2) + x^(3 k - 1), {k, 2, nmax}]), {x, 0, nmax}], x]
CROSSREFS
KEYWORD
sign
AUTHOR
Ilya Gutkovskiy, Sep 25 2017
STATUS
approved