|
%I #7 Mar 12 2014 16:37:05
%S 1,5,354,88153,48340622,46980371858,71465177189700,157019003242118337,
%T 471091863366049740694,1851713757075363098855542
%N A142459(2*n,n)/(n+1).
%F a(n) = A142459(2*n,n)/(n+1).
%t A[n_, 1] := 1; A[n_, n_] := 1;
%t A[n_, k_] := (4*n - 4*k + 1)A[n - 1, k - 1] + (4*k - 3)A[n - 1, k];
%t a = Table[A[n, k], {n, 20}, {k, n}];
%t Table[a[[2*n + 1, n + 1]]/(n + 1), {n, 0, 9}]
%Y Cf. A142459.
%K nonn
%O 0,2
%A _Roger L. Bagula_, Nov 19 2010
|
