login
A009260
Expansion of exp(tanh(tan(x))).
0
1, 1, 1, 1, 1, -7, -47, -279, -1343, -5167, -8671, 150833, 2436545, 27945609, 249528945, 1993449433, 10176663169, -9028140255, -1606374108095, -31838140005407, -482969577637247, -6048738288194407, -59264468409177327
OFFSET
0,6
MATHEMATICA
With[{nn=30}, CoefficientList[Series[Exp[Tanh[Tan[x]]], {x, 0, nn}], x] Range[ 0, nn]!] (* Harvey P. Dale, Jun 08 2021 *)
CROSSREFS
Sequence in context: A091516 A064385 A269520 * A201871 A198845 A323131
KEYWORD
sign,easy
AUTHOR
EXTENSIONS
Extended with signs by Olivier Gérard, Mar 15 1997
Previous Mathematica program replaced by Harvey P. Dale, Jun 08 2021
STATUS
approved