A013416 Expansion of e.g.f.: exp(arcsin(x)-arcsinh(x))=1+2/3!*x^3+40/6!*x^6+450/7!*x^7+2240/9!*x^9...

1, 0, 0, 2, 0, 0, 40, 450, 0, 2240, 108000, 1786050, 246400, 30888000, 1647734400, 36567781250, 11531520000, 1356752592000, 85195294912000, 2380490964101250, 1210714801920000, 153377369153840000

Offset

0,4

Links

Table of n, a(n) for n=0..21.

Mathematica

With[{nn=30}, CoefficientList[Series[Exp[ArcSin[x]-ArcSinh[x]], {x, 0, nn}], x] Range[0, nn]!] (* Harvey P. Dale, Dec 11 2017 *)

Crossrefs

Sequence in context: A004076 A365974 A013369 * A365973 A156433 A169771

Adjacent sequences: A013413 A013414 A013415 * A013417 A013418 A013419

Keyword

nonn

Author

Patrick Demichel (patrick.demichel(AT)hp.com)

Extensions

Definition clarified by Harvey P. Dale, Dec 11 2017

Status

approved