OFFSET
0,2
LINKS
Vincenzo Librandi, Table of n, a(n) for n = 0..1000
L. Carlitz, R. Scoville, A generating function for triangular partitions, Math. Comp. 29 (1975) 67-77.
Index entries for linear recurrences with constant coefficients, signature (6, -15, 25, -45, 85, -135, 198, -298, 442, -627, 856, -1156, 1560, -2048, 2614, -3322, 4201, -5209, 6349, -7697, 9268, -11004, 12899, -15023, 17404, -19943, 22592, -25456, 28539, -31676, 34828, -38103, 41461, -44737, 47875, -50957, 53980, -56736, 59150, -61376, 63385, -64954, 66068, -66888, 67385, -67385, 66888, -66068, 64954, -63385, 61376, -59150, 56736, -53980, 50957, -47875, 44737, -41461, 38103, -34828, 31676, -28539, 25456, -22592, 19943, -17404, 15023, -12899, 11004, -9268, 7697, -6349, 5209, -4201, 3322, -2614, 2048, -1560, 1156, -856, 627, -442, 298, -198, 135, -85, 45, -25, 15, -6, 1).
FORMULA
G.f.: 1/((1-x)^6*(1-x^3)^5*(1-x^5)^4*(1-x^7)^3*(1-x^9)^2* (1-x^11)).
MATHEMATICA
CoefficientList[Series[1/((1 - x)^6 (1 - x^3)^5 (1 - x^5)^4 (1 - x^7)^3 (1 - x^9)^2 (1 - x^11)), {x, 0, 50}], x]
PROG
(Magma) m:=50; R<x>:=PowerSeriesRing(Integers(), m); Coefficients(R!(1/((1-x)^6*(1-x^3)^5*(1-x^5)^4*(1-x^7)^3*(1-x^9)^2*(1-x^11))));
(PARI) Vec(1/((1-x)^6*(1-x^3)^5*(1-x^5)^4*(1-x^7)^3*(1-x^9)^2*(1-x^11)) + O(x^30)) \\ Felix Fröhlich, Aug 29 2016
CROSSREFS
KEYWORD
nonn,easy
AUTHOR
Vincenzo Librandi, Aug 29 2016
STATUS
approved