|
%I #5 Oct 31 2015 15:33:14
%S 654729075,2862426470400,1296211708989225,261264015391703040,
%T 34500885158438507610,3502077835791610920960,297315399971212318577070,
%U 22214713615158982916505600,1510589164324758020706100635,95690236900543163501872250880,5743287914726512704740717709585
%N Number of permutations of [n] containing exactly ten occurrences of the consecutive pattern 132.
%H Alois P. Heinz, <a href="/A263894/b263894.txt">Table of n, a(n) for n = 21..100</a>
%F a(n) = A197365(n,10).
%p b:= proc(u, o, t) option remember; series(`if`(u+o=0, 1,
%p add(b(u-j, o+j-1, 0)*`if`(j<=t, x, 1), j=1..u)+
%p add(b(u+j-1, o-j, j-1), j=1..o)), x, 11)
%p end:
%p a:= n-> coeff(b(n, 0$2), x, 10):
%p seq(a(n), n=21..35);
%Y Column k=10 of A197365.
%K nonn
%O 21,1
%A _Alois P. Heinz_, Oct 28 2015
|
