login
The OEIS is supported by the many generous donors to the OEIS Foundation.

 

Logo
Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A359863 a(n) = Sum_{d|n} d^(n/d) * (n/d)^d. 3
1, 4, 6, 24, 10, 156, 14, 528, 747, 1620, 22, 15000, 26, 12572, 60780, 98336, 34, 397908, 38, 1484840, 1500324, 495660, 46, 18514992, 9765675, 2768948, 28697868, 85098552, 58, 375843660, 62, 570425408, 471565380, 75759684, 2626093820, 7623165384, 74, 378536012 (list; graph; refs; listen; history; text; internal format)
OFFSET
1,2
LINKS
FORMULA
a(n) = [x^n] Sum_{k>0} k * (n * x / k)^k / (1 - k * x^k).
If p is prime, a(p) = 2 * p.
MATHEMATICA
a[n_] := DivisorSum[n, #^(n/#) * (n/#)^# &]; Array[a, 40] (* Amiram Eldar, Aug 09 2023 *)
PROG
(PARI) a(n) = sumdiv(n, d, d^(n/d)*(n/d)^d);
CROSSREFS
Cf. A359004.
Sequence in context: A004032 A123046 A237748 * A326233 A087784 A174197
KEYWORD
nonn
AUTHOR
Seiichi Manyama, Jan 16 2023
STATUS
approved

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recents
The OEIS Community | Maintained by The OEIS Foundation Inc.

License Agreements, Terms of Use, Privacy Policy. .

Last modified June 19 09:37 EDT 2024. Contains 373501 sequences. (Running on oeis4.)