OFFSET
0,3
LINKS
Vincenzo Librandi, Table of n, a(n) for n = 0..100
EXAMPLE
x+1/3*x^2-1/18*x^3-1/27*x^4-5/648*x^5+503/68040*x^6+521/136080*x^7-13/51030*x^8...
MATHEMATICA
Join[{1}, Denominator[List@@(Normal[CoefficientList[Series[ArcCosh[ Exp[x]- Sin[x]], {x, 0, 30}], x] [[1, 2]]])]] (* Harvey P. Dale, Jun 28 2014 *)
CROSSREFS
KEYWORD
nonn,frac
AUTHOR
N. J. A. Sloane, Dec 17 2011
STATUS
approved