OFFSET
1,2
MATHEMATICA
Table[Sum[GCD[n^(n - i), n - i], {i, n}], {n, 100}]
PROG
(PARI) a(n) = sum(i=1, n, gcd(n^(n-i), n-i)); \\ Michel Marcus, Apr 15 2021
CROSSREFS
KEYWORD
nonn
AUTHOR
Wesley Ivan Hurt, Apr 13 2021
STATUS
approved