login
n-th semiprime minus n.
1

%I #7 Jun 12 2024 15:55:36

%S 3,4,6,6,9,9,14,14,16,16,22,22,22,24,24,30,32,33,36,37,37,40,42,45,49,

%T 51,55,57,57,57,60,61,61,61,71,75,78,80,80,81,81,81,86,89,89,95,95,95,

%U 96,96,104,106,106,107,111,113,120,120,124,125,126,132,138,138,138,139

%N n-th semiprime minus n.

%F a(n) = A001358(n) - A000027(n).

%t Module[{nn=300,sps},sps=Select[Range[nn],PrimeOmega[#]==2&];#[[1]]-#[[2]]&/@Thread[ {sps,Range[Length[sps]]}]] (* _Harvey P. Dale_, Jun 12 2024 *)

%Y Cf. A001358.

%K nonn

%O 1,1

%A _Juri-Stepan Gerasimov_, Aug 10 2010

%E Corrected (61 replaced by 71) by _R. J. Mathar_, Aug 13 2010