cp's OEIS Frontend

A244718 Number of compositions of n with exactly 6 transitions between different parts.

%I A244718 #5 Jul 06 2014 16:40:53
%S A244718 1,8,52,225,813,2444,6563,15837,35304,73544,144542,270622,485229,
%T A244718 838813,1401911,2277346,3601229,5565741,8415746,12487185,18197114,
%U A244718 26097804,36868409,51383060,70693900,96130946,129286606,172104111,226920654,296516361,384211698
%N A244718 Number of compositions of n with exactly 6 transitions between different parts.
%H A244718 Alois P. Heinz, <a href="/A244718/b244718.txt">Table of n, a(n) for n = 10..900</a>
%p A244718 b:= proc(n, v) option remember; `if`(n=0, [1, 0$6],
%p A244718       add(`if`(v in [0, i], b(n-i, `if`(i<=n-i, i, -1)),
%p A244718       [0, b(n-i, `if`(i<=n-i, i, -1))[1..6][]]), i=1..n))
%p A244718     end:
%p A244718 a:= n-> b(n, 0)[7]:
%p A244718 seq(a(n), n=10..60);
%Y A244718 Column k=6 of A238279.
%K A244718 nonn
%O A244718 10,2
%A A244718 _Joerg Arndt_ and _Alois P. Heinz_, Jul 04 2014