|
%I #8 Sep 08 2013 13:30:50
%S 1,1,2,9,83,1226,24727,627909,19169758,682800001,27776711627,
%T 1270110048234,64470498348983,3596569233141701,218698213338646702,
%U 14395754017090902609,1019782749198898131883,77351848007810972904826
%N Row 5 of table A113143; equal to INVERT of quintic (or 5-fold) factorials shifted one place right.
%F a(n) = Sum_{j=0..k} 5^(k-j)*A111146(k, j).
%F a(0) = 1; a(n+1) = Sum_{k=0..n} a(k)*A008548(n-k).
%e A(x) = 1 + x + 2*x^2 + 9*x^3 + 83*x^4 + 1226*x^5 +...
%e = 1/(1 - x - x^2 - 6*x^3 - 66*x^4 -...- A008548(n)*x^(n+1)
%e -...).
%o (PARI) {a(n)=local(x=X+X*O(X^n)); A=1/(1-x-x^2*sum(j=0,n,x^j*prod(i=0,j,5*i+1)));return(polcoeff(A,n,X))}
%Y Cf. A113143, A008548 (5-fold factorials).
%K nonn
%O 0,3
%A _Philippe Deléham_ and _Paul D. Hanna_, Oct 28 2005
|
