OFFSET
1,1
COMMENTS
There are 672 semiprimes of form prime+1 below 100000.
LINKS
Reinhard Zumkeller, Table of n, a(n) for n = 1..10000
FORMULA
MATHEMATICA
Select[Range[6000], Plus@@Last/@FactorInteger[#]==2&&PrimeQ[#-1]&] (* Vladimir Joseph Stephan Orlovsky, May 08 2011 *)
Select[ Prime@ Range@ 460 +1, PrimeOmega@# == 2 &] (* Robert G. Wilson v, Feb 18 2014 *)
PROG
(Haskell)
a077068 n = a077068_list !! (n-1)
a077068_list = filter ((== 1) . a010051 . (`div` 2)) a008864_list
-- Reinhard Zumkeller, Nov 22 2013
(PARI) [x+1|x<-primes(10^5), bigomega(x+1)==2] \\ Charles R Greathouse IV, Nov 22 2013
(PARI) is(n)=isprime(n-1) && isprime(n\2) \\ Charles R Greathouse IV, Mar 20 2016
CROSSREFS
KEYWORD
nonn
AUTHOR
Reinhard Zumkeller, Oct 23 2002
STATUS
approved