|
|
A013243
|
|
Expansion of e.g.f.: cosh(log(x+1)-tan(x))=1+3/4!*x^4+90/6!*x^6-168/7!*x^7+4725/8!*x^8...
|
|
0
|
|
|
1, 0, 0, 0, 3, 0, 90, -168, 4725, -22176, 404964, -3167120, 51954903, -563026464, 9315656350, -126730926840, 2219178178217, -35798640990400, 676619926058632, -12499985614160160, 256672333451106667
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
0,5
|
|
LINKS
|
|
|
MATHEMATICA
|
With[{nn=20}, CoefficientList[Series[Cosh[Log[x+1]-Tan[x]], {x, 0, nn}], x] Range[0, nn]!] (* Harvey P. Dale, Aug 02 2021 *)
|
|
CROSSREFS
|
|
|
KEYWORD
|
sign
|
|
AUTHOR
|
Patrick Demichel (patrick.demichel(AT)hp.com)
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|