|
%I #13 Mar 24 2020 21:18:25
%S 1,1,1,2,2,2,3,3,4,5,5,6,8,8,9,11,12,13,15,16,18,20,21,23,27,28,30,34,
%T 36,38,42,44,48,52,54,58,64,66,70,76,80,84,90,94,100,106,110,116,125,
%U 129,135,144,150,156,165,171
%N Expansion of 1/((1-x)(1-x^3)(1-x^8)(1-x^12)).
%C Number of partitions of n into parts 1, 3, 8, and 12. - _Joerg Arndt_, May 22 2014
%H <a href="/index/Rec#order_24">Index entries for linear recurrences with constant coefficients</a>, signature (1,0,1,-1,0,0,0,1,-1,0,-1,2,-1,0,-1,1,0,0,0,-1,1,0,1,-1).
%t CoefficientList[Series[1/((1-x)(1-x^3)(1-x^8)(1-x^12)), {x, 0, 90}], x] (* _Jinyuan Wang_, Mar 24 2020 *)
%o (PARI) a(n)=round((n+12)*(2*n^2+48*n+179+9*(-1)^n)/3456+[2*(n\2)+12,1][n%2+1]*(-1)^(n\2)/96-[-2,1,1][n%3+1]*(n\3+1)/36) \\ _Tani Akinari_, May 22 2014
%K nonn,easy
%O 0,4
%A _N. J. A. Sloane_
|
