OFFSET
1,1
COMMENTS
LINKS
Charles R Greathouse IV, Table of n, a(n) for n = 1..10000
FORMULA
a(n) = 2 * A046388(n). - Amiram Eldar, Mar 03 2021
EXAMPLE
30=2*3*5 and 42=2*3*7 are even, squarefree and have 3 prime factors.
MAPLE
ts_3_sod := proc(n); if (numtheory[bigomega](n)=3 and numtheory[mobius](n)=-1 and type(n, even)='true') then RETURN(n); fi end: a3sod := [seq(ts_3_sod(i), i=1..2500)]: a3sod;
MATHEMATICA
Select[2*Range[300], SquareFreeQ[#]&&PrimeNu[#]==3&] (* Harvey P. Dale, Feb 16 2018 *)
PROG
(PARI) list(lim)=my(v=List()); forprime(p=5, lim\6, forprime(q=3, min(lim\(2*p), p-2), listput(v, 2*p*q))); Set(v) \\ Charles R Greathouse IV, Aug 29 2017
CROSSREFS
KEYWORD
easy,nonn
AUTHOR
Jani Melik, Oct 13 2002
EXTENSIONS
Edited by Dean Hickerson, Oct 21 2002
STATUS
approved