OFFSET
3,1
COMMENTS
LINKS
Carl Pomerance, On Carmichael's conjecture, Proceedings of the American Mathematical Society 43 (1974), 297-298.
Wikipedia, Carmichael's totient function conjecture
PROG
(PARI) row_a343902(n) = my(e=eulerphi(n), v=[]); forprime(p=1, e, if(e%(p-1)==0, v=concat(v, [p]))); v
a(n) = my(v=row_a343902(n)); sum(i=1, #v, n%v[i]^2)
CROSSREFS
KEYWORD
nonn
AUTHOR
Felix Fröhlich, May 03 2021
STATUS
approved