OFFSET
0,2
MATHEMATICA
nn = 20; Table[(CoefficientList[Series[-Tan[Sin[x] - Sinh[x]], {x, 0, 2*nn+1}], x] * Range[0, 2*nn+1]!)[[n]], {n, 2, 2*nn, 2}] (* Vaclav Kotesovec, Feb 06 2015 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
Patrick Demichel (patrick.demichel(AT)hp.com)
EXTENSIONS
a(0)=0 prepended by Vaclav Kotesovec, Feb 06 2015
Definition modified by Vaclav Kotesovec, Feb 06 2015
STATUS
approved