%I #4 May 13 2020 19:00:26
%S 1,2,8,48,376,3552,38072,433664,4677184,29762560,-793410432,
%T -54950522880,-2386117894016,-93904016252928,-3620999060747776,
%U -140559707495727104,-5551125947636719616,-223832352597495644160,-9212210790951194357760,-385841470335205512314880
%N E.g.f. A(x) satisfies: A(x) = sin(x * exp(A(x))).
%F E.g.f.: series reversion of arcsin(x) / exp(x).
%t nmax = 20; CoefficientList[InverseSeries[Series[ArcSin[x]/Exp[x], {x, 0, nmax}], x], x] Range[0, nmax]! // Rest
%Y Cf. A227463, A227465.
%K sign
%O 1,2
%A _Ilya Gutkovskiy_, May 13 2020