|
| |
|
|
A348144
|
|
a(n) = Sum_{d|n} n^(n^2/d).
|
|
0
|
|
|
|
1, 20, 19710, 4295033088, 298023223876956250, 10314424798490637108305446464, 256923577521058878088611477224235622145150, 6277101735386680763835789423286894578616620063532571951104, 196627050475552913618075908526912116283103450944214825077052418578026469007467
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
|
OFFSET
|
1,2
|
|
|
LINKS
|
|
|
|
MATHEMATICA
|
Table[Sum[n^(n^2/i)*(1 - Ceiling[n/i] + Floor[n/i]), {i, n}], {n, 10}]
|
|
|
PROG
|
(PARI) a(n) = sumdiv(n, d, n^(n^2/d)); \\ Michel Marcus, Oct 03 2021
|
|
|
CROSSREFS
|
|
|
|
KEYWORD
|
nonn
|
|
|
AUTHOR
|
|
|
|
STATUS
|
approved
|
| |
|
|
