|
%I #12 Aug 26 2018 17:24:25
%S 0,1,-125,249250,-2886735625,122209131374375,-14455143383196875000,
%T 4006210678487307667578125,-2297417123000769120910212890625,
%U 2485076260705905645263720799941406250,-4719878705811419698488114573981055908203125
%N a(n) = [x] OmegaPolynomial(5, n). OmegaPolynomials are defined in A318146.
%p # The function OmegaPolynomial is defined in A318146.
%p seq(coeff(OmegaPolynomial(5, n), x, 1), n=0..11);
%t LMlist[m_, len_] := Table[(m n)!, {n, 0, len}]*
%t CoefficientList[Series[Log[MittagLefflerE[m, z]], {z, 0, len}], z];
%t LMlist[5, 13]
%Y Cf. A318253 (case n=5), A318146.
%Y Cf. A000182 (m=2), A293951 (m=3), A273352 (m=4), this seq (m=5).
%K sign
%O 0,3
%A _Peter Luschny_, Aug 22 2018
|
