OFFSET
0,3
LINKS
Vincenzo Librandi, Table of n, a(n) for n = 0..1000
Index entries for linear recurrences with constant coefficients, signature (1, 1, 0, 0, 0, 0, 0, 0, 0, 1, 0, -1).
MATHEMATICA
f[x_] = 1 - x^2 - x^10 - x^11 + x^12;
g[x] = ExpandAll[x^12*f[1/x]]; a = Table[SeriesCoefficient[Series[1/g[x], {x, 0, 50}], n], {n, 0, 50}]
CoefficientList[Series[1/(1-x-x^2-x^10+x^12), {x, 0, 40}], x] (* Harvey P. Dale, May 31 2012 *)
CROSSREFS
KEYWORD
nonn,easy
AUTHOR
Roger L. Bagula, Nov 09 2008
STATUS
approved