A012567 E.g.f.: arctan(sinh(x)*cos(x)) = x - 4/3!*x^3 + 60/5!*x^5 - 2784/7!*x^7 + 225680/9!*x^9...

1, -4, 60, -2784, 225680, -29884864, 5784292800, -1544557830144, 543835022577920, -244140571254682624, 136105808837097815040, -92250989686413124706304, 74707244097461420738908160

Offset

1,2

Links

Vincenzo Librandi, Table of n, a(n) for n = 1..200

Mathematica

With[{nn=30}, Take[CoefficientList[Series[ArcTan[Sinh[x]Cos[x]], {x, 0, nn}], x] Range[0, nn-1]!, {2, -1, 2}]] (* Harvey P. Dale, May 16 2012 *)

Crossrefs

Sequence in context: A012488 A181444 A177780 * A132627 A229771 A341275

Adjacent sequences: A012564 A012565 A012566 * A012568 A012569 A012570

Keyword

sign

Author

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

Extensions

Definition clarified by Harvey P. Dale, May 16 2012

Status

approved