OFFSET
1,1
MATHEMATICA
Numerator/@Select[CoefficientList[Series[(1+x)^(1/3)-(1-x)^(1/3), {x, 0, 40}], x], #!=0&] (* Harvey P. Dale, Jun 30 2011 *)
CROSSREFS
KEYWORD
easy,frac,nonn
AUTHOR
Benoit Cloitre, Mar 30 2002
STATUS
approved