login
A009482
E.g.f. sin(sin(x)*cosh(x)) (odd powers only).
1
1, 1, -23, -135, 4785, 102353, -4499623, -167774711, 9259741409, 697193437985, -45391655836087, -4778091975791591, 356972130348630673, 60384518907092417009, -5135539171238913723207
OFFSET
0,3
LINKS
MATHEMATICA
With[{nn=30}, Take[CoefficientList[Series[Sin[Sin[x]*Cosh[x]], {x, 0, nn}], x] Range[0, nn-1]!, {2, -1, 2}]] (* Harvey P. Dale, Aug 05 2014 *)
CROSSREFS
Sequence in context: A141963 A157907 A039613 * A191745 A260842 A093806
KEYWORD
sign
AUTHOR
EXTENSIONS
Extended with signs by Olivier Gérard, Mar 15 1997
Previous Mathematica program replaced by Harvey P. Dale, Aug 05 2014
STATUS
approved