login
A012318
tan(arcsin(x)*exp(x))=x+2/2!*x^2+6/3!*x^3+32/4!*x^4+240/5!*x^5...
0
0, 1, 2, 6, 32, 240, 2000, 19656, 221888, 2846784, 40430848, 632914304, 10802538496, 199980939392, 3985563555584, 85138224664832, 1939700554334208, 46962544699670528, 1203843275552612352
OFFSET
0,3
FORMULA
a(n) ~ n! / ((Pi/2 + exp(r)/sqrt(1-r^2)) * r^(n+1)), where r = 0.70212550839123612037106419625287862875439228120419... is the root of the equation arcsin(r)*exp(r) = Pi/2. - Vaclav Kotesovec, Feb 06 2015
MATHEMATICA
CoefficientList[Series[Tan[E^x*ArcSin[x]], {x, 0, 20}], x] * Range[0, 20]! (* Vaclav Kotesovec, Feb 06 2015 *)
CROSSREFS
Sequence in context: A111550 A261398 A009686 * A012521 A211195 A346452
KEYWORD
nonn
AUTHOR
Patrick Demichel (patrick.demichel(AT)hp.com)
EXTENSIONS
a(0)=0 prepended by Vaclav Kotesovec, Feb 06 2015
STATUS
approved