OFFSET
1,1
LINKS
Robert Israel, Table of n, a(n) for n = 1..100
EXAMPLE
a(3) = 29 because the next prime after 29 ending in 9 is 29+3*10=59.
MAPLE
V:= Vector(50): count:= 0:
L:= Vector(9):
p:= 2:
while count < 50 do
p:= nextprime(p);
d:= p mod 10;
if L[d] = 0 then L[d]:= p
else
m:= (p - L[d])/10;
if m <= 100 and V[m] = 0 then
V[m]:= L[d]; count:= count+1;
fi;
L[d]:= p;
fi
od:
convert(V, list);
CROSSREFS
KEYWORD
nonn,base
AUTHOR
J. M. Bergot and Robert Israel, Jan 19 2021
STATUS
approved