|
|
A369866
|
|
a(n) = Sum_{p|n, p prime} n^prime(n/p).
|
|
1
|
|
|
0, 4, 9, 64, 25, 7992, 49, 2097152, 59049, 100000001000, 121, 106993241210880, 169, 30491346729331198648, 8649756618750, 75557863725914323419136, 289, 74347713614042750878184448000, 361, 53687091200000000000000000001280000000, 30041942495081695978842, 412195366437884247746798137865015318817176
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,2
|
|
LINKS
|
|
|
MATHEMATICA
|
Table[DivisorSum[n, n^Prime[n/#] &, PrimeQ[#] &], {n, 30}]
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn,easy
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|