OFFSET
1,1
COMMENTS
Semiprime analog of A117065.
MATHEMATICA
v = #*(3*#-1)/2& @ Range[0, 90]; Select[ Complement[ Range[0, 11000], Union[Total /@ Tuples[{v, v, v}]]], PrimeOmega[#] == 2 &] (* Giovanni Resta, Jun 13 2016 *)
CROSSREFS
KEYWORD
fini,full,nonn
AUTHOR
Jonathan Vos Post, Aug 06 2006
EXTENSIONS
Missing a(39) = 2126 from Giovanni Resta, Jun 13 2016
STATUS
approved