|
%I #6 Jul 28 2023 19:23:52
%S 1,0,0,-2,0,-8,40,-226,896,-13264,62304,-1040866,6528896,-128181272,
%T 950205568,-21880956098,189104984064,-4957876255136,48968006626816,
%U -1441276692392770,16013733248841728,-522786344819213608
%N Expansion of e.g.f.: exp(sin(x)-arcsin(x))=1-2/3!*x^3-8/5!*x^5+40/6!*x^6-226/7!*x^7...
%t With[{nn=30},CoefficientList[Series[Exp[Sin[x]-ArcSin[x]],{x,0,nn}],x] Range[0,nn]!] (* _Harvey P. Dale_, Jul 28 2023 *)
%K sign
%O 0,4
%A Patrick Demichel (patrick.demichel(AT)hp.com)
%E Definition clarified by _Harvey P. Dale_, Jul 28 2023
|
