OFFSET
1,1
COMMENTS
LINKS
Charles R Greathouse IV, Table of n, a(n) for n = 1..10000
EXAMPLE
96 is an element of this sequence because 96 = 2^5 * 3, the sum of whose prime factors is 2 + 2 + 2 + 2 + 2 + 3 = 13, which has no prime factors in common with 96.
PROG
(PARI) list(lim)=my(v=List()); forprime(p=2, lim\32, forprime(q=2, min(p, lim\16\p), my(pq=p*q); forprime(r=2, min(lim\pq\8, q), my(pqr=pq*r); forprime(s=2, min(lim\pqr\4, r), my(pqrs=pqr*s); forprime(t=2, min(lim\pqrs\2, s), my(pqrst=pqrs*t, n); forprime(u=2, min(lim\pqrst, t), n=pqrst*u; if(gcd(n, p+q+r+s+t+u)==1, listput(v, n)))))))); Set(v) \\ Charles R Greathouse IV, Jan 31 2017
CROSSREFS
KEYWORD
easy,nonn
AUTHOR
Jonathan Vos Post, Jul 17 2005
EXTENSIONS
Extended by Ray Chandler, Jul 20 2005
STATUS
approved