A085822 Smallest prime with n prime substrings (excluding prime itself but allowing leading zeros).
2, 13, 23, 113, 137, 373, 1973, 1733, 1373, 10337, 10313, 31379, 37337, 113173, 211373, 313739, 337397, 1113173, 1003733, 2313797, 2337397, 10003733, 11031373, 11373379, 33133733, 20037337, 100037339, 103137337
Offset: 0
Examples
a(5)=373 because it is prime and has 5 prime substrings: 3,7,3,37,73.
Crossrefs
Cf. A085823.
Programs
-
Maple
V:= Array(0..27): count:= 0: p:= 1: while count < 28 do p:= nextprime(p); v:= nps(p); if v <= 100 and V[v] = 0 then V[v]:= p; count:= count+1 fi od: convert(V,list); # Robert Israel, Mar 03 2023
Extensions
More terms from Robert Israel, Mar 03 2023