A088002 Expansion of (1+x^2)/(1+x^2+x^5).

1, 0, 0, 0, 0, -1, 0, 1, 0, -1, 1, 1, -2, -1, 3, 0, -4, 2, 5, -5, -5, 9, 3, -14, 2, 19, -11, -22, 25, 20, -44, -9, 66, -16, -86, 60, 95, -126, -79, 212, 19, -307, 107, 386, -319, -405, 626, 298, -1012, 21, 1417, -647, -1715, 1659, 1694, -3076, -1047, 4791, -612, -6485, 3688, 7532, -8479, -6920, 14964, 3232

Offset: 0

Author

N. J. A. Sloane, Nov 02 2003

Keywords

• sign
• easy

Links

• Robert Israel, Table of n, a(n) for n = 0..10000
• Index entries for linear recurrences with constant coefficients, signature (0,-1,0,0,-1)

Crossrefs

Cf. A011746.

Programs

Maple

f:= gfun:-rectoproc({a(n+5)=-a(n)-a(n+3),a(0)=1,
seq(a(i)=0,i=1..4)},a(n),remember):
map(f, [$1..100]); # Robert Israel, Jul 18 2016

Mathematica

CoefficientList[Series[(1+x^2)/(1+x^2+x^5),{x,0,80}],x] (* or *) LinearRecurrence[ {0,-1,0,0,-1},{1,0,0,0,0},80] (* Harvey P. Dale, Jan 08 2023 *)

PARI

Vec((1+x^2)/(1+x^2+x^5)+O(x^99)) \\ Charles R Greathouse IV, Sep 26 2012