OFFSET
1,1
EXAMPLE
20583601 is a prime and the next prime is 20583701, both which end in 0,1.
MATHEMATICA
Select[Partition[Prime[Range[10000000]], 2, 1], Mod[#[[1]], 100]==Mod[+#[[2]], 100]==1&][[All, 1]]
CROSSREFS
KEYWORD
nonn,base
AUTHOR
Harvey P. Dale, Mar 01 2020
STATUS
approved