A374103 Numbers k such that k and k+2 are both prime binary self (or Colombian) numbers (A374102).

311, 599, 641, 881, 1319, 1697, 1721, 2657, 2969, 3257, 4019, 4127, 4337, 4721, 5009, 6449, 6569, 6689, 6761, 7547, 9041, 9239, 10457, 10529, 11171, 11699, 11939, 13691, 16229, 19379, 20147, 20357, 20477, 22697, 23057, 24977, 25169, 26249, 26681, 26729, 27059

Offset: 1

Author

Amiram Eldar, Jun 28 2024

Keywords

• nonn
• base
• easy

Links

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

Crossrefs

Subsequence of A001359, A339216 and A374102.

Cf. A010061, A006378.

Programs

Mathematica

seq[max_] := Module[{c = Complement[Prime[Range[max]], Table[n + DigitCount[n, 2, 1], {n, 0, Prime[max]}]], d, ind}, d = Differences[c]; ind = Position[d, 2] // Flatten; c[[ind]]]; seq[3000]