OFFSET
1,1
COMMENTS
The lower prime factor p_1 is equal to 2 and the other two are twin primes: p_3 - p_2 = 2.
LINKS
Hugo Pfoertner, Table of n, a(n) for n = 1..10000
EXAMPLE
60 is a term since 60 = 2^2*3*5 and 2 + 3 = 5.
286 is a term since 286 = 2*11*13 and 2 + 11 = 13.
MATHEMATICA
Select[Range[2500], PrimeNu[#]==3&&Part[First/@FactorInteger[#], 1]+Part[First/@FactorInteger[#], 2]==Part[First/@FactorInteger[#], 3]&]
PROG
(PARI) isok(k) = if (omega(k)==3, my(f=factor(k)[, 1]); f[1] + f[2] == f[3]); \\ Michel Marcus, Sep 19 2023
CROSSREFS
KEYWORD
nonn
AUTHOR
Stefano Spezia, Sep 19 2023
STATUS
approved