|
| |
|
|
A063794
|
|
usigma(n)=n+phi(n).
|
|
0
| | |
|
|
|
OFFSET
| 2,1
|
|
|
PROG
| (PARI) us(n) = sumdiv(n, d, if(gcd(d, n/d)==1, d)); for(n=1, 10^8, if(us(n)==n+eulerphi(n), print(n)))
|
|
|
CROSSREFS
| Cf. A034448.
Sequence in context: A009674 A143598 A071220 * A202942 A177400 A168554
Adjacent sequences: A063791 A063792 A063793 * A063795 A063796 A063797
|
|
|
KEYWORD
| nonn
|
|
|
AUTHOR
| Jason Earls (zevi_35711(AT)yahoo.com), Aug 18 2001
|
|
|
EXTENSIONS
| More terms from Jud McCranie (JudMcCranie(AT)ugaalum.uga.edu), Nov 04 2001. No other terms < 2700000000.
|
| |
|
|
