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,3

Links

Table of n, a(n) for n=0..10.

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]

Crossrefs

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

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

Sequence in context: A265623 A050640 A161354 * A003751 A120807 A013836

Adjacent sequences: A318255 A318256 A318257 * A318259 A318260 A318261

Keyword

sign

Author

Peter Luschny, Aug 22 2018

Status

approved