A167517 Emirps (A007500) which are concatenation of three consecutive primes (A030469).
353359367, 193319491951, 334733593361, 344934573461, 346734693491, 732173317333, 902990419043, 104591046310477, 133091331313327, 141591417314177, 146571466914683, 150131501715031, 154431545115461
Offset: 1
Programs
-
PARI
for(i=1,9999, isprime(eval(p=Str(prime(i),prime(i+1),prime(i+2)))) & isprime(eval(concat(vecextract(Vec(p),"-1..1"))))& print1(p,", "))
Comments