[go: up one dir, main page]

login
A029422
Expansion of 1/((1-x^6)(1-x^7)(1-x^11)(1-x^12)).
1
1, 0, 0, 0, 0, 0, 1, 1, 0, 0, 0, 1, 2, 1, 1, 0, 0, 1, 3, 2, 1, 1, 1, 2, 4, 3, 2, 1, 2, 3, 5, 4, 3, 3, 3, 5, 7, 5, 4, 4, 5, 6, 9, 7, 6, 6, 7, 9, 11, 9, 8, 8, 9, 11, 14, 12, 11, 11, 12, 14, 17, 15, 14, 14, 15, 17, 21, 19, 18, 18, 19, 21
OFFSET
0,13
LINKS
Index entries for linear recurrences with constant coefficients, signature (0, 0, 0, 0, 0, 1, 1, 0, 0, 0, 1, 1, -1, 0, 0, 0, -1, -2, -1, 0, 0, 0, -1, 1, 1, 0, 0, 0, 1, 1, 0, 0, 0, 0, 0, -1).
MATHEMATICA
CoefficientList[Series[1/((1-x^6)(1-x^7)(1-x^11)(1-x^12)), {x, 0, 80}], x] (* or *) LinearRecurrence[{0, 0, 0, 0, 0, 1, 1, 0, 0, 0, 1, 1, -1, 0, 0, 0, -1, -2, -1, 0, 0, 0, -1, 1, 1, 0, 0, 0, 1, 1, 0, 0, 0, 0, 0, -1}, {1, 0, 0, 0, 0, 0, 1, 1, 0, 0, 0, 1, 2, 1, 1, 0, 0, 1, 3, 2, 1, 1, 1, 2, 4, 3, 2, 1, 2, 3, 5, 4, 3, 3, 3, 5}, 80] (* Harvey P. Dale, Mar 01 2017 *)
PROG
(Magma) m:=80; R<x>:=PowerSeriesRing(Integers(), m); Coefficients(R!(1/((1-x^6)*(1-x^7)*(1-x^11)*(1-x^12)))); // Vincenzo Librandi, Mar 28 2017
CROSSREFS
Sequence in context: A078807 A208249 A329985 * A351356 A152800 A223730
KEYWORD
nonn
AUTHOR
STATUS
approved