login
Twin primes not of the form p+2^k where p is prime and k>0.
1

%I #12 Dec 24 2019 08:26:58

%S 3,149,599,809,1019,1619,2789,2999,3119,3299,3539,4001,4229,4271,4649,

%T 5099,6269,6449,6659,6791,6869,7331,7547,8087,8387,8429,8861,9239,

%U 9431,9929,10007,11069,11171,11549,12239,12251,13001,13217,13679,13901,14009,14081,14249

%N Twin primes not of the form p+2^k where p is prime and k>0.

%H Amiram Eldar, <a href="/A181748/b181748.txt">Table of n, a(n) for n = 1..10000</a>

%e 149 is a twin prime, 149-2^1 through 149-2^7 are all nonprime.

%t seqQ[p_] := PrimeQ[p] && PrimeQ[p + 2] && Module[{k = 2}, While[k < p && !PrimeQ[p - k], k *= 2]; k > p]; Select[Range[10^4], seqQ] (* _Amiram Eldar_, Dec 24 2019 *)

%Y Cf. A001359, A065381.

%K nonn

%O 1,1

%A _Juri-Stepan Gerasimov_, Nov 09 2010

%E Edited and extended by _D. S. McNeil_, Nov 17 2010

%E More terms from _Amiram Eldar_, Dec 24 2019