Reminder: The OEIS is hiring a new managing editor, and the application deadline is January 26.
%I #14 Dec 20 2024 15:27:09
%S 0,1,2,3,8,25,72,259,1024,4113,18720,89859,451200,2452905,13870976,
%T 82466115,517341184,3364642465,22907884032,162289204995,1190546278400,
%U 9080010901689,71557772290048,582825476943747,4904509780131840
%N Expansion of exp(sinh(x))*x.
%t With[{nn=30},CoefficientList[Series[Exp[Sinh[x]]*x,{x,0,nn}],x] Range[0,nn]!] (* _Harvey P. Dale_, Dec 20 2024 *)
%K nonn,easy
%O 0,3
%A _R. H. Hardin_
%E Extended and signs tested Mar 15 1997 by _Olivier GĂ©rard_.
%E Previous Mathematica program replaced by _Harvey P. Dale_, Dec 20 2024