(MAGMAMagma) 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
(MAGMAMagma) 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
proposed
approved
editing
proposed
Vincenzo Librandi, <a href="/A029422/b029422.txt">Table of n, a(n) for n = 0..10000</a>
(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
approved
editing
editing
approved
<a href="/index/Rec#order_36">Index entries for linear recurrences with constant coefficients</a>, 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).
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 *)
approved
editing
_N. J. A. Sloane (njas(AT)research.att.com)_.
nonn,new
nonn
N. J. A. Sloane (njas(AT)research.att.com).
Expansion of 1/((1-x^6)(1-x^7)(1-x^11)(1-x^12)).
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
0,13
nonn
njas
approved