|
| |
|
|
A009505
|
|
Expansion of sin(tan(x))*cos(x).
|
|
0
|
|
|
|
1, -2, -8, -184, -5568, -231552, -11751296, -596164352, -4342886400, 10035384119296, 3825733461393408, 1266087931055144960, 431690972162311487488, 158346541732411570847744, 63296242766270753646313472
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
|
OFFSET
|
0,2
|
|
|
LINKS
|
Table of n, a(n) for n=0..14.
|
|
|
MATHEMATICA
|
With[{nn=30}, Take[CoefficientList[Series[Sin[Tan[x]]*Cos[x], {x, 0, nn}], x] Range[0, nn-1]!, {2, -1, 2}]] (* Harvey P. Dale, May 31 2015 *)
|
|
|
CROSSREFS
|
Sequence in context: A009377 A181234 A156526 * A305737 A028368 A056990
Adjacent sequences: A009502 A009503 A009504 * A009506 A009507 A009508
|
|
|
KEYWORD
|
sign
|
|
|
AUTHOR
|
R. H. Hardin
|
|
|
EXTENSIONS
|
Extended with signs by Olivier Gérard, Mar 15 1997
Prior Mathematica program replaced by Harvey P. Dale, May 31 2015
|
|
|
STATUS
|
approved
|
| |
|
|
