cp's OEIS Frontend

A227601 Number of lattice paths from {n}^10 to {0}^10 using steps that decrement one component such that for each point (p_1,p_2,...,p_10) we have p_1<=p_2<=...<=p_10.

%I A227601 #3 Jul 17 2013 15:04:28
%S A227601 1,1,58786,72686739116,569413385415535738,15313737501505148093502344,
%T A227601 1003769793669980634048599763674485,
%U A227601 129559009610760457771091688202936893773393,28544115728527488452514857447327666866636823456709
%N A227601 Number of lattice paths from {n}^10 to {0}^10 using steps that decrement one component such that for each point (p_1,p_2,...,p_10) we have p_1<=p_2<=...<=p_10.
%p A227601 b:= proc(l) option remember; `if`(l[-1]=0, 1, add(add(b(subsop(
%p A227601       i=j, l)), j=`if`(i=1, 0, l[i-1])..l[i]-1), i=1..nops(l)))
%p A227601     end:
%p A227601 a:= n-> `if`(n=0, 1, b([n$10])):
%p A227601 seq(a(n), n=0..10);
%Y A227601 Column k=10 of A227578.
%K A227601 nonn
%O A227601 0,3
%A A227601 _Alois P. Heinz_, Jul 17 2013