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,3

Links

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

Mathematica

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

Crossrefs

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

Sequence in context: A200193 A188571 A083102 * A330544 A056080 A241232

Adjacent sequences: A270663 A270664 A270665 * A270667 A270668 A270669

Keyword

nonn

Author

Vaclav Kotesovec, Mar 21 2016

Status

approved