OFFSET
1,1
COMMENTS
This sequence is a subsequence of A107986, which only requires k to be composite. The first term in that sequence which is not in this sequence is 45, a number with three prime factors. - Alonso del Arte, May 03 2014
LINKS
Zak Seidov, Table of n, a(n) for n = 1..10000.
MATHEMATICA
Select[ Range[ 2, 1500 ], Plus @@ Last@Transpose@FactorInteger[ # ] == 2 && PrimeQ[ # - 2 ] & ]
Select[Range[700], PrimeOmega[#] == 2 && PrimeQ[# - 2]&] (* Harvey P. Dale, Mar 25 2013 *)
PROG
(PARI) { n=0; for (m=1, 10^9, a=prime(m) + 2; f=factor(a)~; if ((length(f)==1 && f[2, 1]==2) || (length(f)==2 && f[2, 1]==1 && f[2, 2]==1), write("b062721.txt", n++, " ", a); if (n==10000, break)) ) } \\ Harry J. Smith, Aug 09 2009
CROSSREFS
KEYWORD
nonn,easy
AUTHOR
Ahmed Fares (ahmedfares(AT)my-deja.com), Jul 14 2001
STATUS
approved