A012384 Expansion of e.g.f. cosh(tan(x)*arcsin(x)) (only even powers).

1, 0, 12, 360, 17360, 1310400, 144530496, 21954348416, 4395670339840, 1123588067813376, 357961496153111552, 139464080335428552704, 65410617565591737749504, 36435637291817171826196480, 23820054207674461161979723776, 18084463907679336905848601149440, 15793967239239406403224411048050688

Offset

0,3

Links

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

Example

E.g.f. = 1 + 12/4!*x^4 + 360/6!*x^6 + 17360/8!*x^8 + ...

Mathematica

With[{nn=32}, Take[CoefficientList[Series[Cosh[Tan[x]ArcSin[x]], {x, 0, nn}], x]*Range[0, nn]!, {1, -1, 2}]] (* Stefano Spezia, Dec 27 2025 *)

Crossrefs

Sequence in context: A012424 A009165 A012627 * A012429 A012631 A327986

Adjacent sequences: A012381 A012382 A012383 * A012385 A012386 A012387

Keyword

nonn

Author

Patrick Demichel

Extensions

a(14)-a(16) from Stefano Spezia, Dec 27 2025

Status

approved