%I #16 Sep 27 2021 07:55:19
%S 1,1,11,-75,3969,-140595,7374191,-435638203,30421321073,
%T -2409092861175,214562251828275,-21195275581114635,
%U 2301157855016159905,-272330254968023391035,34894294917147760652775,-4812715265513253499593675,710922905477027337578759265,-111981455662673544130741177455
%N a(n) = [x^n] (2*n)! * Sum_{k=0..2*n} binomial(x,k).
%H Seiichi Manyama, <a href="/A347987/b347987.txt">Table of n, a(n) for n = 0..326</a>
%F a(n) = A054651(2*n,n) = A190782(2*n,n).
%F a(n) = [x^(2*n)] ((2*n)!/n!) * (log(1 + x))^n/(1 - x).
%F a(n) ~ (-1)^n * c * d^n * (n-1)!, where d = 8*w^2/(2*w-1), where w = -LambertW(-1,-exp(-1/2)/2) = 1.7564312086261696769827376166... and c = 0.0754348897003844405252291731755274... - _Vaclav Kotesovec_, Sep 27 2021
%o (PARI) a(n) = (2*n)!*polcoef(sum(k=n, 2*n, binomial(x, k)), n);
%Y Cf. A054651, A098118, A190782, A347989.
%K sign
%O 0,3
%A _Seiichi Manyama_, Sep 23 2021
|