OFFSET
0,2
LINKS
G. C. Greubel, Table of n, a(n) for n = 0..141
FORMULA
a(n) = (4*n+2)! * [x^(4*n+2)] sinh(sinh(x)*sin(x))/2.
MATHEMATICA
nmax = 50; coes = CoefficientList[Series[Sinh[Sinh[x]*Sin[x]]/2, {x, 0, 4*nmax + 2}], x]; a[n_] := coes[[4*n + 3]]*(4*n + 2)!; Table[a[n], {n, 0, nmax}] (* G. C. Greubel, Jan 30 2018 *)
CROSSREFS
KEYWORD
sign
AUTHOR
EXTENSIONS
Extended with signs Mar 1997
STATUS
approved