login

Year-end appeal: Please make a donation to the OEIS Foundation to support ongoing development and maintenance of the OEIS. We are now in our 61st year, we have over 378,000 sequences, and we’ve reached 11,000 citations (which often say “discovered thanks to the OEIS”).

A110187
3-almost primes p * q * r relatively prime to p+q+r.
13
12, 20, 28, 44, 45, 52, 63, 68, 75, 76, 92, 99, 116, 117, 124, 147, 148, 153, 164, 165, 171, 172, 175, 188, 207, 212, 236, 244, 245, 261, 268, 273, 275, 279, 284, 292, 316, 325, 332, 333, 345, 356, 363, 369, 385, 387, 388, 399, 404, 412, 423, 425, 428, 435
OFFSET
1,1
COMMENTS
A110188 is the converse, 3-almost primes p * q * r not relatively prime to p+q+r.
LINKS
Charles R Greathouse IV, Table of n, a(n) for n = 1..10000
EXAMPLE
a(1) = 12 because 12 = 2^2 * 3, which is relatively prime to 2 + 2 + 3 = 7.
30 is not in the sequence, since 30 = 2 * 3 * 5, which is in fact divisible by 2 + 3 + 5 = 10.
92 is in the sequence since 92 = 2^2 x 23, 2 + 2 + 23 = 27 = 3^3, (92, 27) = 1.
MATHEMATICA
Select[Range[500], PrimeOmega[#]==3&&CoprimeQ[#, Total[Times @@@ FactorInteger[ #]]]&] (* Harvey P. Dale, May 15 2019 *)
PROG
(PARI) list(lim)=my(v=List()); forprime(p=2, lim\4, forprime(q=2, min(p, lim\2\p), my(pq=p*q, t); forprime(r=2, min(lim\pq, q), t=r*pq; if(gcd(t, p+q+r)==1, listput(v, t))))); Set(v) \\ Charles R Greathouse IV, Jan 31 2017
KEYWORD
easy,nonn
AUTHOR
Jonathan Vos Post, Jul 15 2005
EXTENSIONS
Extended by Ray Chandler, Jul 20 2005
STATUS
approved