OFFSET
1,1
COMMENTS
After deleting the 1, leading zeros are allowed (see also A290753).
LINKS
Robert Israel, Table of n, a(n) for n = 1..10000
MAPLE
filter:= n -> numtheory:-bigomega(n) = 2 and isprime(n - 10^ilog10(n)):
select(filter, [seq(seq(10^d+x, x=1..10^d-1), d=1..2)]); # Robert Israel, Aug 18 2017
CROSSREFS
KEYWORD
nonn,base
AUTHOR
N. J. A. Sloane, Aug 17 2017, following a suggestion from J. M. Bergot.
STATUS
approved