A211674 Least prime number prime(n+k) such that prime(n+k) - prime(k) is a power of 2.

3, 7, 11, 29, 23, 19, 79, 61, 37, 263, 173, 137, 131, 101, 83, 71, 67, 787, 571, 409, 367, 307, 241, 211, 7283, 181, 151, 4517, 139, 131, 1877, 1409, 1373, 1277, 1289, 929, 983, 719, 569, 563, 653, 24793, 419, 467, 359, 353, 14293, 317, 16519, 293, 269, 263

Offset

1,1

Links

T. D. Noe, Table of n, a(n) for n = 1..1000

Mathematica

Table[k = 1; While[!IntegerQ[Log[2, Prime[n+k] - Prime[k]]], k++]; Prime[n+k], {n, 100}]

Crossrefs

Cf. A211673, A211675.

Sequence in context: A093361 A227364 A051202 * A035095 A066674 A125878

Adjacent sequences: A211671 A211672 A211673 * A211675 A211676 A211677

Keyword

nonn

Author

T. D. Noe, Apr 23 2012

Status

approved