login
Primes q of the form q = 10p + 3, where p is also prime.
6

%I #23 Jul 14 2017 22:22:38

%S 23,53,73,113,173,193,233,293,313,373,433,593,613,673,733,1013,1033,

%T 1093,1373,1493,1733,1913,1933,1973,1993,2113,2273,2293,2333,2393,

%U 2633,2693,2713,2833,3313,3373,3533,3593,3673,3733,3793,3833,4013,4093,4493

%N Primes q of the form q = 10p + 3, where p is also prime.

%C These primes correspond to resulting primes for A232210, when A232210(n)=1. - _Vladimir Shevelev_, Oct 16 2014

%H Michael De Vlieger, <a href="/A055782/b055782.txt">Table of n, a(n) for n = 1..10000</a>

%F a(n) = 10*A023238(n) + 3. - _R. J. Mathar_, Sep 21 2009

%e 5413 = 541*10 + 3, 3 appended to 541.

%t Select[Prime@ Range@ 630, PrimeQ[(# - 3)/10] &] (* _Michael De Vlieger_, Jul 14 2017 *)

%o (PARI) lista(nn) = {forprime(p=2, nn, if (isprime(q=10*p+3), print1(q, ", ")););} \\ _Michel Marcus_, Oct 20 2014

%Y Cf. A005384, A005385, A023238. Apart from first term, same as A057667.

%K nonn,easy

%O 1,1

%A _Labos Elemer_, Jul 13 2000