OFFSET
1,1
LINKS
Robert Israel, Table of n, a(n) for n = 1..10000
MAPLE
filter:= n -> isprime(n * 10^(1+ilog10(n+7)) + n + 7):
select(filter, [seq(i, i=2..10000, 2)]); # Robert Israel, May 13 2025
CROSSREFS
KEYWORD
nonn,base
AUTHOR
Patrick De Geest, May 15 1998
STATUS
approved
