A052392 - OEIS

%I #9 Nov 26 2018 17:09:33

%S 1,6,39,261,1779,12288,85734,602871,4265859,30338604,216677490,

%T 1552999242,11164548078,80471658192,581340627372,4208086875915,

%U 30514467991011,221620953353844,1611867544369146

%N T(2n+1,n), array T as in A054120.

%H Robert Israel, <a href="/A052392/b052392.txt">Table of n, a(n) for n = 0..1145</a>

%F From _Robert Israel_, Nov 26 2018: (Start)

%F Empirical g.f.: (2*x^2-3*x+1)/(2*sqrt(4*x^2-8*x+1)*x)+(x-1)/(2*x).

%F Empirical recurrence: 8*n*a(n)+(-32-28*n)*a(1+n)+(78+30*n)*a(n+2)+(-45-11*n)*a(n+3)+(5+n)*a(n+4)=0. (End)

%p T:= proc(n,k) option remember;

%p   if k=0 or k=n then return 1 fi;

%p   if k > n then return 0 fi;

%p   procname(n-1,k-1) + 2*procname(n-2,k-1) + procname(n-1,k)

%p end proc;

%p T(2,1):= 3:

%p seq(T(2*n+1,n),n=0..30); # _Robert Israel_, Nov 26 2018

%K nonn

%O 0,2

%A _Clark Kimberling_