A294388 a(n) = n! * [x^n] exp(Sum_{k=1..n} sigma_n(k) * x^k).

1, 1, 11, 223, 12193, 1548841, 501460531, 355752425239, 558112176198305, 2023318561014654769, 15928875457207423721731, 268023268481704204728199711, 10084410400965244525857478169665, 817174553170437003290060071895273113

Offset

0,3

Links

Seiichi Manyama, Table of n, a(n) for n = 0..75

Mathematica

Table[n! * SeriesCoefficient[Exp[Sum[DivisorSigma[n, k] * x^k, {k, 1, n}]], {x, 0, n}], {n, 0, 20}] (* Vaclav Kotesovec, Aug 30 2025 *)

Crossrefs

Main diagonal of A294296.

Cf. A252782.

Sequence in context: A142541 A295542 A089917 * A281257 A386366 A187646

Adjacent sequences: A294385 A294386 A294387 * A294389 A294390 A294391

Keyword

nonn

Author

Seiichi Manyama, Oct 30 2017

Status

approved