A012075 Expansion of e.g.f.: exp(arcsin(tan(x)))=1+x+1/2!*x^2+4/3!*x^3+13/4!*x^4+76/5!*x^5...

1, 1, 1, 4, 13, 76, 421, 3424, 26713, 285136, 2871241, 38302144, 473357413, 7603381696, 111506036461, 2097552753664, 35624155784113, 768471264000256, 14838126699784081, 361133162545705984

Offset

0,4

Links

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

Mathematica

With[{nn=20}, CoefficientList[Series[Exp[ArcSin[Tan[x]]], {x, 0, nn}], x] Range[0, nn]!] (* Harvey P. Dale, Dec 12 2017 *)

Crossrefs

Sequence in context: A012150 A362572 A012261 * A197942 A337286 A140417

Adjacent sequences: A012072 A012073 A012074 * A012076 A012077 A012078

Keyword

nonn

Author

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

Extensions

Definition clarified by Harvey P. Dale, Dec 12 2017

Status

approved