A318258 a(n) = [x] OmegaPolynomial(5, n). OmegaPolynomials are defined in A318146.

0, 1, -125, 249250, -2886735625, 122209131374375, -14455143383196875000, 4006210678487307667578125, -2297417123000769120910212890625, 2485076260705905645263720799941406250, -4719878705811419698488114573981055908203125

Offset: 0

Author

Peter Luschny, Aug 22 2018

Keywords

• sign

Crossrefs

Cf. A318253 (case n=5), A318146.

Cf. A000182 (m=2), A293951 (m=3), A273352 (m=4), this seq (m=5).

Programs

Maple

# The function OmegaPolynomial is defined in A318146.
seq(coeff(OmegaPolynomial(5, n), x, 1), n=0..11);

Mathematica

LMlist[m_, len_] := Table[(m n)!, {n, 0, len}]*
CoefficientList[Series[Log[MittagLefflerE[m, z]], {z, 0, len}], z];
LMlist[5, 13]