A243085 - OEIS

%I #4 May 29 2014 16:58:45

%S 1,1,2,4,8,16,32,64,127,255,502,1004,1972,3908,7660,15044,29361,57209,

%T 110982,214648,413552,793936,1518344,2892496,5500825,10392649,

%U 19569158,36845760,68891188,128241332,238736764,442162796,814790985,1499513369,2750419066

%N Number of compositions of n into parts with multiplicity not larger than 7.

%C Number of compositions of n avoiding the pattern {1}^8.

%H Alois P. Heinz, <a href="/A243085/b243085.txt">Table of n, a(n) for n = 0..1000</a>

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

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

%p     end:

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

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

%Y Column k=7 of A243081.

%K nonn

%O 0,3

%A _Alois P. Heinz_, May 29 2014