|
| |
|
|
A009514
|
|
sin(sinh(x)*tan(x))=2/2!*x^2+12/4!*x^4+22/6!*x^6-6888/8!*x^8...
|
|
2
|
|
|
|
0, 2, 12, 22, -6888, -664918, -59975388, -5718140738, -547324724688, -38493249163438, 4551120221502012, 4118717773789761382, 1943760618993686019912, 842266610124834993878522, 367005752387547761811702612, 164337720240421801745499143182
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
|
OFFSET
|
0,2
|
|
|
LINKS
|
Table of n, a(n) for n=0..15.
|
|
|
MATHEMATICA
|
With[{nn=30}, Take[CoefficientList[Series[Sin[Tan[x]Sinh[x]], {x, 0, nn}], x] Range[0, nn]!, {1, -1, 2}]] (* Harvey P. Dale, Oct 04 2014 *)
|
|
|
CROSSREFS
|
Sequence in context: A093378 A012664 A012545 * A192851 A112718 A117301
Adjacent sequences: A009511 A009512 A009513 * A009515 A009516 A009517
|
|
|
KEYWORD
|
sign
|
|
|
AUTHOR
|
R. H. Hardin
|
|
|
EXTENSIONS
|
Extended with signs by Olivier Gérard, Mar 15 1997
More terms from and prior Mathematica program replaced by Harvey P. Dale, Oct 04 2014
|
|
|
STATUS
|
approved
|
| |
|
|
