|
%I #5 Mar 30 2024 02:32:55
%S 1,1,1,4,4,11,67,29,260,876,3841,34134,69774,152231,774243,4182754,
%T 30376720,409813561,1056300594,3175397668,3655126844,91668397027,
%U 499871922705,5219638765816,120716816247428,17518596045460,193032439198301,3860666483055372,22675538336311998
%N Expansion of e.g.f. Product_{k>=1} (1 + mu(k)^2*x^k/k!).
%t nmax = 28; CoefficientList[Series[Product[(1 + MoebiusMu[k]^2 x^k/k!), {k, 1, nmax}], {x, 0, nmax}], x] Range[0, nmax]!
%Y Cf. A005117, A007837, A008683, A032310, A087188, A115278, A334370, A371549.
%K nonn
%O 0,4
%A _Ilya Gutkovskiy_, Mar 27 2024
|
