A270666 E.g.f.: Product_{k>=1} (1 + tan(x^k)).

1, 1, 2, 14, 48, 416, 3360, 29504, 274176, 3503104, 45192960, 579956992, 8982251520, 138130720768, 2456648183808, 45868468109312, 871166211686400, 17536583860060160, 393972064172900352, 8704569607311982592, 210657904645299240960, 5322004254737369399296

Offset: 0

Author

Vaclav Kotesovec, Mar 21 2016

Keywords

• nonn

Crossrefs

Cf. A130263, A270294, A270598, A270662, A270664, A270665.

Programs

Mathematica

nmax = 25; Range[0, nmax]! * CoefficientList[Series[Product[(1+Tan[x^k]), {k, 1, nmax}], {x, 0, nmax}], x]