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,4

Comments

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

Links

Table of n, a(n) for n=0..40.

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

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 *)

Crossrefs

Sequence in context: A302160 A122984 A254341 * A302632 A045860 A081504

Adjacent sequences: A188474 A188475 A188476 * A188478 A188479 A188480

Keyword

sign,easy

Author

Paul Barry, Apr 01 2011

Status

approved