OFFSET
1,1
LINKS
Robert Israel, Table of n, a(n) for n = 1..10000
EXAMPLE
a(3) = 19 because 19 = 10011_2 and 10011 mod 19 = 17 which is prime.
MAPLE
filter:= proc(n) isprime(n) and isprime(convert(n, binary) mod n) end proc:
select(filter, [seq(i, i=3..10000, 2)]);
CROSSREFS
KEYWORD
nonn,base
AUTHOR
J. M. Bergot and Robert Israel, Dec 08 2020
STATUS
approved