|
| |
|
|
A063795
|
|
usigma(n)=phi(n)*omega(n), where omega(n) is the number of distinct prime divisors.
|
|
1
| |
|
|
35, 99, 357, 495, 1672, 2108, 3135, 3465, 3692, 5152, 11704, 14756, 15800, 18375, 20026, 23374, 23560, 25714, 25844, 33915, 35074, 39585, 49196, 55154, 56134, 66040, 86900, 99484, 104140, 105105, 110600, 116116, 124558, 141340, 157586
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 1,1
|
|
|
LINKS
| Harry J. Smith, Table of n, a(n) for n=1,...,200
|
|
|
PROG
| (PARI) us(n) = sumdiv(n, d, if(gcd(d, n/d)==1, d)); ? for(n=1, 10^7, if(us(n)==eulerphi(n)*omega(n), print(n)))
(PARI) us(n) = sumdiv(n, d, if(gcd(d, n/d)==1, d)) { n=0; for (m=1, 10^9, if(us(m)==eulerphi(m)*omega(m), write("b063795.txt", n++, " ", m); if (n==200, break)) ) } [From Harry J. Smith (hjsmithh(AT)sbcglobal.net), Aug 31 2009]
|
|
|
CROSSREFS
| Cf. A034448.
Sequence in context: A146206 A044222 A044603 * A015882 A010085 A033852
Adjacent sequences: A063792 A063793 A063794 * A063796 A063797 A063798
|
|
|
KEYWORD
| nonn
|
|
|
AUTHOR
| Jason Earls (zevi_35711(AT)yahoo.com), Aug 18 2001
|
| |
|
|
