login
A120391
Expansion of -x*(1+x-x^2+x^3+4*x^4) / ( (x^3-2*x^2-x+1)*(x^3+2*x^2-x-1) ).
0
0, 1, 1, 4, 6, 18, 24, 67, 85, 231, 287, 771, 949, 2536, 3108, 8285, 10133, 26980, 32966, 87726, 107140, 285035, 348037, 925799, 1130311, 3006511, 3670473, 9762796, 11918536, 31700713, 38700153, 102933300, 125660022, 334225018, 408017728
OFFSET
0,4
MATHEMATICA
CoefficientList[Series[-x(1+x-x^2+x^3+4x^4)/((x^3-2x^2-x+1)(x^3+ 2x^2- x-1)), {x, 0, 40}], x] (* or *) LinearRecurrence[{0, 5, 0, -6, 0, 1}, {0, 1, 1, 4, 6, 18}, 40] (* Harvey P. Dale, Feb 05 2012 *)
CROSSREFS
Sequence in context: A109310 A219190 A337617 * A064217 A026623 A026689
KEYWORD
nonn,easy
AUTHOR
STATUS
approved