A181493 Numbers of the form 3*2^k which are the average of twin primes, i.e., a(n)-1 and a(n)+1 are both prime.
6, 12, 192, 786432
Offset: 1
Programs
-
Mathematica
Select[3 2^Range[500],PrimeQ[#-1]&&PrimeQ[#+1]&] (* Harvey P. Dale, Jan 18 2011 *)
-
PARI
for( k=1,999, ispseudoprime(3<
Comments