A244169 - OEIS

%I #4 Jun 21 2014 16:39:10

%S 1,0,0,0,0,0,1,0,0,0,0,0,925,1716,4719,5005,11011,12376,24494,28848,

%T 49771,60985,94997,113323,176576,205948,300841,362000,502840,588343,

%U 17972200,47500741,164220317,452654380,1198032651,2936508011,6683727408,15107475055

%N Number of compositions of n in which the minimal multiplicity of parts equals 6.

%H Alois P. Heinz, <a href="/A244169/b244169.txt">Table of n, a(n) for n = 6..400</a>

%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, $max(1, k)..n/i])))

%p     end:

%p a:= n-> b(n$2, 0, 6) -b(n$2, 0, 7):

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

%Y Column k=6 of A242451.

%K nonn

%O 6,13

%A _Alois P. Heinz_, Jun 21 2014