A063794 Numbers k such that usigma(k) = k + phi(k).
2, 28, 1368, 1700, 342000, 2061000, 2120832, 65834560, 89082000
Offset: 1
Programs
-
PARI
us(n) = sumdiv(n,d, if(gcd(d,n/d)==1,d)); for(n=1,10^8, if(us(n)==n+eulerphi(n),print1(n, ", ")))
Extensions
More terms from Jud McCranie, Nov 04 2001
Offset corrected by Mohammed Yaseen, Jul 17 2023
Comments