A055384 Expansion of (1 + 4*x + 14*x^2 + 34*x^3 + 63*x^4 + 80*x^5 + 87*x^6 + 68*x^7 + 42*x^8 + 20*x^9 + 7*x^10) / ((1 - x)*(1 - x^2)^2*(1 - x^3)^2*(1 - x^4)).

1, 5, 21, 65, 168, 364, 726, 1316, 2253, 3649, 5681, 8505, 12390, 17544, 24318, 33008, 44061, 57841, 74935, 95785, 121098, 151440, 187650, 230388, 280683, 339297, 407415, 485961, 576290, 679444, 797016, 930176, 1080711, 1249989

Offset

0,2

References

R. P. Stanley, Enumerative Combinatorics, Cambridge, Vol. 2, 1999; see Problem 6.28(c), y_5.

Links

Vincenzo Librandi, Table of n, a(n) for n = 0..1000

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

Mathematica

CoefficientList[Series[(1 + 4 x + 14 x^2 + 34 x^3 + 63 x^4 + 80 x^5 + 87 x^6 + 68 x^7 + 42 x^8 + 20 x^9 + 7 x^10) / ((1 - x) (1 - x^2)^2 (1 - x^3)^2 (1 - x^4)), {x, 0, 40}], x] (* Vincenzo Librandi, Aug 28 2016 *)

Crossrefs

Sequence in context: A146822 A146223 A181093 * A271540 A272987 A272310

Adjacent sequences: A055381 A055382 A055383 * A055385 A055386 A055387

Keyword

nonn,easy

Author

N. J. A. Sloane, Jul 05 2000

Status

approved