A080831 Expansion of e.g.f. exp(tan(exp(x)-1)).

1, 1, 2, 7, 35, 218, 1619, 13973, 137216, 1508981, 18360015, 244770120, 3547043469, 55499654941, 932309976082, 16732137304363, 319458645821311, 6464376124430434, 138181652330967287, 3111035191655067585, 73576818170267997096, 1823567097183804766897, 47261433984395105921195

Offset: 0

Author

Emanuele Munarini, Mar 28 2003

Keywords

• easy
• nonn

Programs

Mathematica

CoefficientList[Series[Exp[Tan[Exp[x] - 1]], {x, 0, 20}], x]*Table[n!, {n, 0, 20}]

PARI

my(x='x+O('x^30)); Vec(serlaplace(exp(tan(exp(x)-1)))) \\ Michel Marcus, Jun 23 2025

Extensions

More terms from Michel Marcus, Jun 23 2025