A125661 Primes p such that p + next prime = 2^k for some k.
3, 61, 4093, 75557863725914323419121, 3064991081731777716716694054300618367237478244367204187
Offset: 1
Keywords
Examples
3+5=8=2^3 61+67=128=2^7
Links
- Hans Havermann, Table of n, a(n) for n = 1..6
Crossrefs
Cf. A091624.
Programs
-
Mathematica
Select[Prime[Range[10^6]],Total[IntegerDigits[#+NextPrime[#],2]]==1&] (* James C. McMahon, Dec 19 2024 *)
Extensions
Corrected by N. J. A. Sloane, Feb 05 2007
Extended by Hans Havermann, Feb 05 2007
Comments