A012188 - OEIS

The OEIS is supported by the many generous donors to the OEIS Foundation.

Year-end appeal: Please make a donation to the OEIS Foundation to support ongoing development and maintenance of the OEIS. We are now in our 61st year, we have over 378,000 sequences, and we’ve reached 11,000 citations (which often say “discovered thanks to the OEIS”).

Other ways to Give

A012188

E.g.f. sinh(arctan(sin(x))) odd powers only.

1, -2, 16, -272, 256, 1758208, -549115904, 178127730688, -68157333438464, 31349506823815168, -17274394522483687424, 11298666083444901019648, -8681212227186028691062784, 7756335594110841587790512128

(list; graph; refs; listen; history; text; internal format)

OFFSET

0,2

COMMENTS

Previous name was: sinh(arctan(sin(x))) = x - 2/3!*x^3 + 16/5!*x^5 - 272/7!*x^7 + 256/9!*x^9 + ...

LINKS

G. C. Greubel, Table of n, a(n) for n = 0..219

MATHEMATICA

With[{nn=30}, Take[CoefficientList[Series[Sinh[ArcTan[Sin[x]]], {x, 0, nn}], x] Range[0, nn-1]!, {2, -1, 2}]] (* Harvey P. Dale, Nov 06 2013 *)

PROG

(PARI) x = 'x + O('x^40); select(x->x, Vec(serlaplace(sinh(atan(sin(x)))))) \\ Michel Marcus, Feb 05 2016

CROSSREFS

Sequence in context: A283685 A197458 A050974 * A217816 A000182 A009764

Adjacent sequences: A012185 A012186 A012187 * A012189 A012190 A012191

KEYWORD

sign

AUTHOR

Patrick Demichel (patrick.demichel(AT)hp.com)

EXTENSIONS

New name from Michel Marcus, Feb 05 2016

Title corrected by Sean A. Irvine, Jul 11 2018

STATUS

approved