|
%I #25 Feb 07 2024 12:34:24
%S 1,0,1,1,2,3,5,8,12,20,31,50,79,126,200,318,506,804,1279,2033,3233,
%T 5140,8173,12995,20662,32853,52236,83056,132059,209975,333861,530841,
%U 844040,1342028,2133832,3392804,5394577
%N Expansion of 1/(1-x^2-x^3-x^4-x^5-x^6-x^7).
%C Number of compositions of n into parts p where 2 <= p < = 7. [_Joerg Arndt_, Jun 24 2013]
%H Vincenzo Librandi, <a href="/A013984/b013984.txt">Table of n, a(n) for n = 0..1000</a>
%H <a href="/index/Rec#order_07">Index entries for linear recurrences with constant coefficients</a>, signature (0,1,1,1,1,1,1)
%t CoefficientList[Series[1 / (1 - x^2 - x^3 - x^4 - x^5 - x^6 - x^7), {x, 0, 40}], x] (* _Vincenzo Librandi_, Jun 23 2013 *)
%o (PARI) Vec(1/(1-x^2-x^3-x^4-x^5-x^6-x^7)+O(x^99)) \\ _Charles R Greathouse IV_, Sep 25 2012
%o (Magma) m:=40; R<x>:=PowerSeriesRing(Integers(), m); Coefficients(R!(1/(1-x^2-x^3-x^4-x^5-x^6-x^7))); // _Vincenzo Librandi_, Jun 24 2013
%K nonn,easy
%O 0,5
%A _N. J. A. Sloane_.
|
