A308814 a(n) = Sum_{d|n} n^(d-1).
1, 3, 10, 69, 626, 7819, 117650, 2097673, 43046803, 1000010011, 25937424602, 743008621405, 23298085122482, 793714780783695, 29192926025441476, 1152921504875286545, 48661191875666868482, 2185911559749718382455, 104127350297911241532842, 5242880000000512000168021
Offset: 1
Keywords
Links
- Seiichi Manyama, Table of n, a(n) for n = 1..387
Programs
-
Mathematica
Table[Total[n^(Divisors[n]-1)],{n,20}] (* Harvey P. Dale, Aug 08 2019 *)
-
PARI
{a(n) = sumdiv(n, d, n^(d-1))}