A294608 a(n) = Sum_{d|n} d^(d + 1 + n/d).

1, 17, 244, 4129, 78126, 1680410, 40353608, 1073758337, 31381061797, 1000000390882, 34522712143932, 1283918474699170, 51185893014090758, 2177953338091847410, 98526125335695332184, 4722366482878235412481, 239072435685151324847154

Offset

1,2

Links

Seiichi Manyama, Table of n, a(n) for n = 1..384

Mathematica

a[n_] := DivisorSum[n, #^(# + 1 + n/#) &]; Array[a, 17] (* Amiram Eldar, Oct 04 2023 *)

Prog

(PARI) {a(n) = sumdiv(n, d, d^(d+1+n/d))}

Crossrefs

Cf. A294606.

Sequence in context: A051560 A259347 A324358 * A294810 A362233 A214175

Adjacent sequences: A294605 A294606 A294607 * A294609 A294610 A294611

Keyword

nonn

Author

Seiichi Manyama, Nov 04 2017

Status

approved