OFFSET
1,1
COMMENTS
Twice the semiprime numbers. - Juri-Stepan Gerasimov, Jun 01 2010
LINKS
Vincenzo Librandi, Table of n, a(n) for n = 1..2626
FORMULA
a(n)=2*A001358(n). - Juri-Stepan Gerasimov, Jun 01 2010
EXAMPLE
28=2^2*7, 30=2*3*5 and 42=2*3*7 are even and are products of exactly 3 primes.
MAPLE
ts_bo3_sod := proc(n); if (numtheory[bigomega](n)=3 and type(n, even)='true') then RETURN(n); fi end: abo3sod := [seq(ts_bo3_sod(i), i=1..2300)]: abo3sod;
MATHEMATICA
Select[Range[100], Plus@@Last/@FactorInteger[#]==2&] 2 (* Vincenzo Librandi, Nov 10 2018 *)
Select[Range[2, 400, 2], PrimeOmega[#]==3&] (* Harvey P. Dale, Oct 15 2021 *)
PROG
(PARI) list(lim)=my(v=List()); forprime(p=2, lim\4, forprime(q=2, min(lim\p\2, p), listput(v, 2*p*q))); Set(v) \\ Charles R Greathouse IV, Aug 29 2017
(Magma) [2*n: n in [2..200] | &+[d[2]: d in Factorization(n)] eq 2]; // Vincenzo Librandi Nov 10 2018
CROSSREFS
KEYWORD
easy,nonn
AUTHOR
Jani Melik, Oct 13 2002
EXTENSIONS
Edited by Dean Hickerson, Oct 21 2002
STATUS
approved