login
A009228
Expansion of e.g.f.: exp(sinh(x)*cos(x)).
1
1, 1, 1, -1, -7, -23, -23, 135, 1297, 4785, 6129, -102353, -894903, -4499623, -829671, 167774711, 1879275169, 9259741409, -1886150559, -697193437985, -7580265762535, -45391655836087, 85001467923145, 4778091975791591, 61409100961369265, 356972130348630673
OFFSET
0,5
LINKS
MAPLE
a:= n-> n! *coeff(series(exp(sinh(x)*cos(x)), x, n+1), x, n):
seq (a(n), n=0..30); # Alois P. Heinz, Aug 22 2012
MATHEMATICA
With[{nn=30}, CoefficientList[Series[Exp[Sinh[x]*Cos[x]], {x, 0, nn}], x]Range[0, nn]!] (* Harvey P. Dale, Aug 22 2012 *)
CROSSREFS
Sequence in context: A121815 A025172 A115023 * A249438 A349230 A031450
KEYWORD
sign,easy
AUTHOR
EXTENSIONS
Extended with signs by Olivier Gérard, Mar 15 1997
Definition clarified by Harvey P. Dale, Aug 22 2012
STATUS
approved