A264908 Primes of the form 2^i + 2^j + 2^k - 1, i > j > k > 0.
13, 37, 41, 43, 73, 83, 97, 103, 137, 139, 151, 163, 167, 193, 199, 223, 521, 523, 547, 577, 607, 641, 643, 647, 769, 1033, 1063, 1091, 1103, 1153, 1283, 1543, 1567, 1663, 2053, 2081, 2083, 2087, 2113, 2143, 2179, 2207, 2239, 2311, 2591, 2687, 3079, 3583, 4129, 4231, 4639
Offset: 1
Keywords
Programs
-
Mathematica
Select[ Flatten[ Table[2^i + 2^j + 2^k - 1, {i, 3, 10}, {j, 2, i - 1}, {k, j - 1}]], PrimeQ]