A072966 Numbers which are not the sum of two semiprimes.
0, 1, 2, 3, 4, 5, 6, 7, 9, 11, 17, 22, 33
Offset: 1
Keywords
Examples
a(10) = 11 since there is no way to represent 11 as a sum of two semiprimes. 13 is not a term since 13 = 4 + 9.
Crossrefs
Cf. A001358.
Programs
-
Mathematica
lim = 10000; s = Select[Range[lim], PrimeOmega[#] == 2 &]; c = Map[Total,Union[Subsets[s, {2}], Table[{s[[i]], s[[i]]}, {i, 1, Length[s]}]]]; Join[Complement[Range[0, lim], c], ">", lim ](* Robert Price, Mar 30 2019 *)
Comments