OFFSET
1,1
COMMENTS
These terms (greater than 0) are not unique. The first duplicate appears at a(256) = a(2236) = 6711.
LINKS
T. D. Noe, Table of n, a(n) for n = 1..10000
D. Bressoud, CNT.m Computational Number Theory Mathematica package.
MATHEMATICA
Needs["CNT`"]; Table[Total[PhiInverse[n]], {n, 100}]
CROSSREFS
KEYWORD
nonn
AUTHOR
T. D. Noe, Oct 12 2012
STATUS
approved