|
%I #4 Mar 21 2016 07:18:31
%S 1,1,2,14,48,416,3360,29504,274176,3503104,45192960,579956992,
%T 8982251520,138130720768,2456648183808,45868468109312,871166211686400,
%U 17536583860060160,393972064172900352,8704569607311982592,210657904645299240960,5322004254737369399296
%N E.g.f.: Product_{k>=1} (1 + tan(x^k)).
%t nmax = 25; Range[0, nmax]! * CoefficientList[Series[Product[(1+Tan[x^k]), {k, 1, nmax}], {x, 0, nmax}], x]
%Y Cf. A130263, A270294, A270598, A270662, A270664, A270665.
%K nonn
%O 0,3
%A _Vaclav Kotesovec_, Mar 21 2016
|
