login
A270665
E.g.f.: Product_{k>=1} 1/(1 - tan(x^k)).
10
1, 1, 4, 20, 136, 1016, 10112, 102080, 1259648, 16501888, 243214592, 3792156928, 66314635264, 1201731751936, 23824296632320, 496708324364288, 11065302289285120, 257749924759273472, 6397599337673523200, 165009476729535463424, 4496775223731602063360
OFFSET
0,3
MATHEMATICA
nmax = 25; Range[0, nmax]! * CoefficientList[Series[Product[1/(1-Tan[x^k]), {k, 1, nmax}], {x, 0, nmax}], x]
CROSSREFS
KEYWORD
nonn
AUTHOR
Vaclav Kotesovec, Mar 21 2016
STATUS
approved