|
%I #6 Apr 08 2022 09:49:04
%S 0,1,2,7,24,101,472,2507,14784,96361,687392,5332207,44694144,
%T 402663821,3880880512,39848805107,434306095104,5007757446481,
%U 60907946680832,779345606053207,10465549612529664,147168296199468341,2162785172079204352,33155700678534788507,529311396083558989824
%N Expansion of e.g.f. sinh(x) / (1 - sin(x)).
%F a(n) = Sum_{k=0..floor((n-1)/2)} binomial(n,2*k+1) * A000111(n-2*k).
%F a(n) ~ sinh(Pi/2) * 2^(n + 7/2) * n^(n + 3/2) / (exp(n) * Pi^(n + 3/2)). - _Vaclav Kotesovec_, Apr 07 2022
%t nmax = 24; CoefficientList[Series[Sinh[x]/(1 - Sin[x]), {x, 0, nmax}], x] Range[0, nmax]!
%Y Cf. A000111, A000667, A000795, A001250, A002084, A062161, A062272, A322623, A348580.
%K nonn
%O 0,3
%A _Ilya Gutkovskiy_, Apr 07 2022
|
