login

Reminder: The OEIS is hiring a new managing editor, and the application deadline is January 26.

a(n) = n! * [x^n] exp(n*x)*arcsinh(x).
3

%I #18 Oct 25 2024 10:14:39

%S 0,1,4,26,240,2884,42660,748544,15185856,349574544,9000902500,

%T 256293989984,7996078704240,271246034903232,9939835626507332,

%U 391303051339622400,16469438021801262848,737992773619777599744,35077254665501330210628,1762671472887447792620032

%N a(n) = n! * [x^n] exp(n*x)*arcsinh(x).

%H N. J. A. Sloane, <a href="/transforms.txt">Transforms</a>

%F a(n) ~ arcsinh(1) * n^n = log(1 + sqrt(2)) * n^n. - _Vaclav Kotesovec_, Jun 09 2019

%F a(n) = Sum_{k=1..n, k odd} (-1)^((k-1)/2)*binomial(n,k)*(k-2)!!^2*n^(n-k). - _Fabian Pereyra_, Oct 05 2024

%t Table[n! SeriesCoefficient[Exp[n x] ArcSinh[x], {x, 0, n}], {n, 0, 19}]

%Y Cf. A001818, A002866, A291483, A302583, A302584, A302585, A302586, A302587, A302605, A302608, A302609.

%K nonn

%O 0,3

%A _Ilya Gutkovskiy_, Apr 10 2018