A339544 Primes p such that A007088(p) mod p is prime.
3, 17, 19, 29, 31, 71, 79, 83, 103, 113, 151, 211, 229, 293, 331, 337, 347, 349, 421, 439, 449, 457, 607, 659, 683, 691, 739, 743, 809, 839, 883, 911, 977, 1039, 1051, 1193, 1249, 1277, 1283, 1303, 1367, 1439, 1451, 1499, 1567, 1597, 1609, 1663, 1747, 1753, 1861, 2089, 2137, 2273, 2309, 2311
Offset: 1
Examples
a(3) = 19 because 19 = 10011_2 and 10011 mod 19 = 17 which is prime.
Links
- Robert Israel, Table of n, a(n) for n = 1..10000
Crossrefs
Cf. A007088.
Programs
-
Maple
filter:= proc(n) isprime(n) and isprime(convert(n,binary) mod n) end proc: select(filter, [seq(i,i=3..10000,2)]);