A374102 Prime binary self (or Colombian) numbers: primes not expressible as the sum of an integer and its binary weight.
13, 23, 37, 71, 83, 97, 113, 233, 311, 313, 337, 359, 373, 401, 409, 449, 457, 499, 569, 593, 599, 601, 617, 641, 643, 739, 761, 809, 821, 853, 881, 883, 929, 947, 953, 977, 1103, 1129, 1153, 1193, 1217, 1237, 1249, 1297, 1303, 1319, 1321, 1429, 1459, 1489, 1499
Offset: 1
Links
- Amiram Eldar, Table of n, a(n) for n = 1..10000
Crossrefs
Programs
-
Mathematica
With[{m = 240}, Complement[Prime[Range[m]], Table[n + DigitCount[n, 2, 1], {n, 0, Prime[m]}]]]