A097519 Prime differences between nextprime(2^n) and 2^n.

3, 5, 3, 3, 7, 5, 3, 17, 3, 29, 3, 7, 17, 43, 29, 3, 11, 3, 11, 17, 53, 31, 7, 23, 29, 7, 59, 5, 5, 3, 131, 29, 13, 131, 3, 29, 11, 29, 37, 11, 7, 23, 13, 17, 3, 7, 29, 59, 61, 7, 277, 281, 43, 71, 29, 41, 277, 67, 7, 29, 17, 67, 37, 5, 5, 97, 7, 107, 19, 83, 7, 5, 107, 101

Offset: 1

Author

Cino Hilliard, Aug 27 2004

Keywords

• nonn

Comments

Primes in A013597. - Bill McEachen, Oct 27 2021

Crossrefs

Cf. A033873, A033874, A013597.

Programs

Mathematica

Select[Table[NextPrime[2^n]-2^n, {n,200}], PrimeQ] (* Harvey P. Dale, Dec 13 2011 *)
Select[NextPrime[#]-#&/@(2^Range[200]),PrimeQ] (* Harvey P. Dale, Jan 05 2024 *)

Extensions

Definition corrected by Harvey P. Dale, Dec 13 2011