A009657 Expansion of tan(sin(sin(x))).

1, 0, -12, 88, 4176, -238912, -1798976, 1359954560, -82934087424, -12122717059072, 3176281608315904, -22431206333925376, -144730933261140701184, 27574419119401032040448, 6996748839515967274205184

Offset

0,3

Links

Table of n, a(n) for n=0..14.

Mathematica

With[{nn=30}, Take[CoefficientList[Series[Tan[Sin[Sin[x]]], {x, 0, nn}], x] Range[0, nn-1]!, {2, -1, 2}]] (* Harvey P. Dale, Jan 15 2020 *)

Crossrefs

Sequence in context: A155635 A126507 A181704 * A012088 A083825 A181944

Adjacent sequences: A009654 A009655 A009656 * A009658 A009659 A009660

Keyword

sign

Author

R. H. Hardin

Extensions

Extended with signs by Olivier Gérard, Mar 15 1997

Previous Mathematica program replaced by Harvey P. Dale, Jan 15 2020

Status

approved