OFFSET
1,1
COMMENTS
69623 is the least prime in this sequence that is equidistant from its predecessor prime (69593) and its successor prime (69653).
EXAMPLE
1637 is in the sequence because it is prime with last digit 7, and both its predecessor prime (1627) and successor prime (1657) also end in 7.
3109 is in the sequence because each of the three consecutive primes 3089, 3109, and 3119 ends in 9.
3119 is not in the sequence: although it is prime and both it and its predecessor prime (3109) end with the digit 9, the next prime (3121) does not.
MATHEMATICA
Select[Partition[Prime[Range[10000]], 3, 1], Mod[#[[1]], 10] == Mod[#[[2]], 10] == Mod[#[[3]], 10] &][[All, 2]]
CROSSREFS
KEYWORD
nonn,base
AUTHOR
K. D. Bajpai, Jan 11 2018
STATUS
approved