login
A352606
Expansion of e.g.f. tan(cos(x) - 1) (even part).
0
0, -1, 1, -31, 421, -19531, 873841, -67417351, 6079224061, -745862759491, 109749390119881, -20006355219508351, 4313763491717212501, -1101230418170874812731, 326019382476444960095521, -111246859639685180908387831, 43247270290320815515213664941
OFFSET
0,4
PROG
(PARI) my(N=40, x='x+O('x^N)); v=Vec(serlaplace(tan(cos(x)-1))); concat(0, vector(#v\2, k, v[2*k-1]))
CROSSREFS
KEYWORD
sign
AUTHOR
Seiichi Manyama, Mar 23 2022
STATUS
approved