login

Year-end appeal: Please make a donation to the OEIS Foundation to support ongoing development and maintenance of the OEIS. We are now in our 61st year, we have over 378,000 sequences, and we’ve reached 11,000 citations (which often say “discovered thanks to the OEIS”).

A009593
Expansion of e.g.f. sinh(sin(x)*cos(x)), odd powers only.
1
1, -3, -23, 1253, -37103, 371085, 76436089, -10302629131, 856245051169, -29959421725155, -7591883371988471, 2479373526284421125, -467017398613705230287, 54102457995859264343469
OFFSET
0,2
LINKS
MATHEMATICA
With[{nmax = 50}, CoefficientList[Series[Sinh[Sin[x]*Cos[x]], {x, 0, nmax}], x]*Range[0, nmax - 1]!][[2 ;; ;; 2]] (* G. C. Greubel, Jan 30 2018 *)
PROG
(PARI) x='x+O('x^30); v=Vec(serlaplace(sinh(sin(x)*cos(x)))); vector((#v-1)\2 , n, v[2*n-1]) \\ G. C. Greubel, Jan 30 2018
CROSSREFS
Sequence in context: A013390 A144986 A088056 * A351107 A009818 A210734
KEYWORD
sign
AUTHOR
EXTENSIONS
Extended with signs by Olivier Gérard, Mar 15 1997
STATUS
approved