OFFSET
1,2
LINKS
Alois P. Heinz, Table of n, a(n) for n = 1..350
FORMULA
J_n(n) = sum{k|n} mu(n/k) k^n, where mu() is the Moebius function.
MAPLE
with(numtheory):
a:= n-> n^n*mul(1-1/p^n, p=factorset(n)):
seq(a(n), n=1..20); # Alois P. Heinz, Jan 09 2015
MATHEMATICA
CROSSREFS
KEYWORD
nonn
AUTHOR
Leroy Quet, Feb 15 2002
STATUS
approved