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

Author

Seiichi Manyama, Oct 30 2017

Keywords

• nonn
• changed

Links

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

Crossrefs

Main diagonal of A294296.

Cf. A252782.

Programs

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 *)