|
%I #13 Sep 08 2022 08:44:50
%S 1,1,1,1,1,2,3,3,3,3,4,5,7,7,7,8,9,11,13,13,14,15,17,19,22,23,24,26,
%T 28,31,35,36,38,40,43,47,52,54,56,59,63,68,74,76,79,83,88,94,101,104,
%U 108,113,119,126,134,138,143
%N Expansion of 1/((1-x)(1-x^5)(1-x^6)(1-x^12)).
%C Number of partitions of n into parts 1, 5, 6 and 12. - _Ilya Gutkovskiy_, May 20 2017
%H Vincenzo Librandi, <a href="/A029090/b029090.txt">Table of n, a(n) for n = 0..1000</a>
%H <a href="/index/Rec#order_24">Index entries for linear recurrences with constant coefficients</a>, signature (1,0,0,0,1,0,-1,0,0,0,-1,2,-1,0,0,0,-1,0,1,0,0,0,1,-1).
%t CoefficientList[Series[1/((1 - x) (1 - x^5) (1 - x^6) (1 -x^12)), {x, 0, 100}], x] (* _Vincenzo Librandi_, May 27 2017 *)
%t LinearRecurrence[{1,0,0,0,1,0,-1,0,0,0,-1,2,-1,0,0,0,-1,0,1,0,0,0,1,-1},{1,1,1,1,1,2,3,3,3,3,4,5,7,7,7,8,9,11,13,13,14,15,17,19},100] (* _Harvey P. Dale_, Apr 29 2018 *)
%o (Magma) m:=70; R<x>:=PowerSeriesRing(Integers(), m); Coefficients(R!(1/((1-x)*(1-x^5)*(1-x^6)*(1-x^12)))); // _Vincenzo Librandi_, May 27 2017
%K nonn
%O 0,6
%A _N. J. A. Sloane_.
|
