|
%I #10 Aug 11 2023 12:48:08
%S 1,1,2,2,4,4,6,7,10,11,14,16,20,22,27,30,36,39,46,50,58,63,72,78,88,
%T 95,106,114,127,136,150,160,176,187,204,217,236,250,270,286,308,325,
%U 349,368,394,414,442,464,494,518
%N Expansion of 1/((1-x)(1-x^2)(1-x^4)(1-x^7)).
%C Number of partitions of n into parts 1, 2, 4 and 7. - _Ilya Gutkovskiy_, May 13 2017
%H <a href="/index/Rec#order_14">Index entries for linear recurrences with constant coefficients</a>, signature (1,1,-1,1,-1,-1,2,-1,-1,1,-1,1,1,-1).
%F a(n) = a(n-1)+a(n-2)-a(n-3)+a(n-4)-a(n-5)-a(n-6)+2*a(n-7)-a(n-8)-a(n-9)+a(n-10)-a(n-11)+a(n-12)+a(n-13)-a(n-14). - _Wesley Ivan Hurt_, May 27 2021
%t CoefficientList[Series[1/((1-x)(1-x^2)(1-x^4)(1-x^7)),{x,0,60}],x] (* or *) LinearRecurrence[{1,1,-1,1,-1,-1,2,-1,-1,1,-1,1,1,-1},{1,1,2,2,4,4,6,7,10,11,14,16,20,22},60] (* _Harvey P. Dale_, Aug 11 2023 *)
%K nonn
%O 0,3
%A _N. J. A. Sloane_.
|
