A243086 - OEIS

%I #5 May 29 2014 16:59:27

%S 1,1,2,4,8,16,32,64,128,255,511,1013,2026,4007,7969,15728,31081,61127,

%T 120063,234991,458813,892999,1733063,3352924,6466805,12432745,

%U 23825009,45552282,86701276,164516870,311753791,587855120,1104493663,2072926133,3874661542

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

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

%H Alois P. Heinz, <a href="/A243086/b243086.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, 8))))

%p     end:

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

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

%Y Column k=8 of A243081.

%K nonn

%O 0,3

%A _Alois P. Heinz_, May 29 2014