A188477 Expansion of (1+x+x^2)*(1-8*x^3-14*x^4+8*x^7+x^8)/(1+x^4)^3.

1, 1, 1, -8, -25, -25, -17, 32, 81, 81, 49, -72, -169, -169, -97, 128, 289, 289, 161, -200, -441, -441, -241, 288, 625, 625, 337, -392, -841, -841, -449, 512, 1089, 1089, 577, -648, -1369, -1369, -721, 800, 1681

Offset: 0

Author

Paul Barry, Apr 01 2011

Keywords

• sign
• easy

Comments

a(n+1) is the Hankel transform of A188476.

Links

• Index entries for linear recurrences with constant coefficients, signature (0,0,0,-3,0,0,0,-3,0,0,0,-1).

Programs

Mathematica

CoefficientList[Series[(1+x+x^2)(1-8x^3-14x^4+8x^7+x^8)/(1+x^4)^3,{x,0,50}],x] (* or *) LinearRecurrence[{0,0,0,-3,0,0,0,-3,0,0,0,-1},{1,1,1,-8,-25,-25,-17,32,81,81,49,-72},50] (* Harvey P. Dale, May 29 2021 *)