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

3, 149, 599, 809, 1019, 1619, 2789, 2999, 3119, 3299, 3539, 4001, 4229, 4271, 4649, 5099, 6269, 6449, 6659, 6791, 6869, 7331, 7547, 8087, 8387, 8429, 8861, 9239, 9431, 9929, 10007, 11069, 11171, 11549, 12239, 12251, 13001, 13217, 13679, 13901, 14009, 14081, 14249

Offset

1,1

Links

Amiram Eldar, Table of n, a(n) for n = 1..10000

Example

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

Mathematica

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 *)

Crossrefs

Cf. A001359, A065381.

Sequence in context: A003009 A037122 A213989 * A118840 A111816 A157555

Adjacent sequences: A181745 A181746 A181747 * A181749 A181750 A181751

Keyword

nonn

Author

Juri-Stepan Gerasimov, Nov 09 2010

Extensions

Edited and extended by D. S. McNeil, Nov 17 2010

More terms from Amiram Eldar, Dec 24 2019

Status

approved