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

2, 3, 3, 13, 7, 3, 47, 29, 5, 199, 109, 73, 67, 37, 19, 7, 3, 659, 443, 281, 239, 179, 113, 83, 7027, 53, 23, 4261, 11, 3, 1621, 1153, 1117, 1021, 1033, 673, 727, 463, 313, 307, 397, 24281, 163, 211, 103, 97, 13781, 61, 16007, 37, 13, 7, 6899, 6947, 7577, 4271

Offset

1,1

Links

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

Example

For n = 4, we have prime(10) - prime(6) = 2^4.
For n = 5, we have prime(9)  - prime(4) = 2^4.

Mathematica

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

Crossrefs

Cf. A211674, A211675.

Sequence in context: A275212 A370554 A127003 * A184178 A350531 A039793

Adjacent sequences: A211670 A211671 A211672 * A211674 A211675 A211676

Keyword

nonn

Author

T. D. Noe, Apr 23 2012

Status

approved