OFFSET
1,1
COMMENTS
LINKS
Robert Israel, Table of n, a(n) for n = 1..10000
EXAMPLE
a(3) = 17 is a term because 17 is a prime, its 10's complement 83 is a prime, and the concatenations 1783 and 8317 are primes.
MAPLE
filter:= proc(n) local d, c;
if not isprime(n) then return false fi;
d:= 10^(1+ilog10(n)); c:= d-n;
isprime(c) and isprime(c*d+n) and isprime(n*10^(1+ilog10(c))+c)
end proc:
select(filter, [seq(i, i=3..10000, 2)]);
CROSSREFS
KEYWORD
nonn,base
AUTHOR
Robert Israel, Jul 03 2024
STATUS
approved