editing
approved
editing
approved
Harvey P. Dale, <a href="/A176241/b176241.txt">Table of n, a(n) for n = 1..1000</a>
approved
editing
editing
approved
Module[{nn=1500, sems}, sems=Select[Range[nn], PrimeOmega[#]==2&]; Select[ Thread[ {sems, Range[Length[sems]]}], PrimeQ[#[[1]]-#[[2]]]&]][[All, 2]] (* Harvey P. Dale, Oct 14 2018 *)
approved
editing
_Juri-Stepan Gerasimov (2stepan(AT)rambler.ru), _, Apr 12 2010
More terms from _R. J. Mathar (mathar(AT)strw.leidenuniv.nl), _, Apr 13 2010
proposed
approved
Numbers n such that n-th semiprime-n is prime
1, 20, 21, 32, 33, 34, 35, 44, 45, 54, 56, 66, 67, 86, 90, 106, 107, 108, 122, 130, 134, 140, 141, 147, 154, 155, 156, 169, 170, 172, 182, 189, 190, 210, 211, 212, 220, 224, 225, 226, 242, 248, 249, 256, 279, 280, 281, 312, 316, 318, 321, 324, 329, 338, 344
1,2
a(1)=1 because A001358(1)-1=4-1=3=prime.
nonn
Juri-Stepan Gerasimov (2stepan(AT)rambler.ru), Apr 12 2010
More terms from R. J. Mathar (mathar(AT)strw.leidenuniv.nl), Apr 13 2010
approved