|
|
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
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
0,6
|
|
LINKS
|
Table of n, a(n) for n=0..22.
|
|
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
Adjacent sequences: A009257 A009258 A009259 * A009261 A009262 A009263
|
|
KEYWORD
|
sign,easy
|
|
AUTHOR
|
R. H. Hardin
|
|
EXTENSIONS
|
Extended with signs by Olivier Gérard, Mar 15 1997
Previous Mathematica program replaced by Harvey P. Dale, Jun 08 2021
|
|
STATUS
|
approved
|
|
|
|