A243122 - OEIS

%I #6 May 29 2014 18:49:37

%S 1,0,6,6,27,49,131,279,635,1370,2722,5877,12170,24113,47660,94470,

%T 186623,355400,680074,1296600,2456115,4535638,8495447,15570655,

%U 28505689,52054671,94229227,169184891,301060621,540575365,956101463,1682865787,2936425870,5167830927

%N Number of compositions of n in which the maximal multiplicity of parts equals 5.

%H Alois P. Heinz, <a href="/A243122/b243122.txt">Table of n, a(n) for n = 5..1000</a>

%F a(n) = A243083(n) - A243082(n) = A243081(n,5) - A243081(n,4).

%p b:= proc(n, i, p, k) option remember; `if`(n=0, p!, `if`(i<1, 0,

%p       add(b(n-i*j, i-1, p+j, k)/j!, j=0..min(n/i, k))))

%p     end:

%p a:= n-> b(n$2, 0, 5) -b(n$2, 0, 4):

%p seq(a(n), n=5..50);

%Y Column k=5 of A242447.

%K nonn

%O 5,3

%A _Alois P. Heinz_, May 29 2014