OFFSET
1,1
COMMENTS
These primes correspond to resulting primes for A232210, when A232210(n)=1. - Vladimir Shevelev, Oct 16 2014
LINKS
Michael De Vlieger, Table of n, a(n) for n = 1..10000
FORMULA
a(n) = 10*A023238(n) + 3. - R. J. Mathar, Sep 21 2009
EXAMPLE
5413 = 541*10 + 3, 3 appended to 541.
MATHEMATICA
Select[Prime@ Range@ 630, PrimeQ[(# - 3)/10] &] (* Michael De Vlieger, Jul 14 2017 *)
PROG
(PARI) lista(nn) = {forprime(p=2, nn, if (isprime(q=10*p+3), print1(q, ", ")); ); } \\ Michel Marcus, Oct 20 2014
CROSSREFS
KEYWORD
nonn,easy
AUTHOR
Labos Elemer, Jul 13 2000
STATUS
approved