D-finite with recurrence: a(n) +2*(1-2*n)*a(n-1) +2*(2*n-1)*(n-1)*a(n-2)=0. - R. J. Mathar, Oct 02 2013
MATHEMATICA
T[n_, k_]:= (-1)^k*n!*2^(n-k)*Binomial[n +1/2, n-k]/k!; Table[Sum[T[n, k], {k, 0, n}], {n, 0, 40}] (* G. C. Greubel, May 14 2018 *)
PROG
(PARI) for(n=0, 30, print1(sum(k=0, n, (-1)^k*n!*2^(n-k)*binomial(n+1/2, n-k)/k!), ", ")) \\ G. C. Greubel, May 14 2018
(Magma) [Round(Factorial(n)*(&+[(-1)^k*2^(n-k)*Gamma(n+3/2)/(Gamma(k+1) *Gamma(n -k+1)*Gamma(k+3/2)): k in [0..n]])): n in [0..20]]; // G. C. Greubel, May 14 2018