Location via proxy:   [ UP ]  
[Report a bug]   [Manage cookies]                
A012362
arcsinh(tan(x)*exp(x)) = x+2/2!*x^2+4/3!*x^3-60/5!*x^5-488/6!*x^6...
0
0, 1, 2, 4, 0, -60, -488, -1416, 20160, 427280, 3830432, -7233536, -955342080, -18140316480, -120169970048, 3583792700544, 145171043297280, 2388380775676160, -7380519436860928, -1710892457585202176
OFFSET
0,3
MATHEMATICA
CoefficientList[Series[ArcSinh[Tan[x]*Exp[x]], {x, 0, 20}], x]* Range[0, 20]! (* Vaclav Kotesovec, Oct 30 2013 *)
CROSSREFS
Sequence in context: A055871 A012716 A173220 * A012710 A333367 A287761
KEYWORD
sign
AUTHOR
Patrick Demichel (patrick.demichel(AT)hp.com)
EXTENSIONS
Prepended missing a(0)=0, Vaclav Kotesovec, Oct 30 2013
STATUS
approved