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

23, 53, 73, 113, 173, 193, 233, 293, 313, 373, 433, 593, 613, 673, 733, 1013, 1033, 1093, 1373, 1493, 1733, 1913, 1933, 1973, 1993, 2113, 2273, 2293, 2333, 2393, 2633, 2693, 2713, 2833, 3313, 3373, 3533, 3593, 3673, 3733, 3793, 3833, 4013, 4093, 4493

Offset: 1

Author

Labos Elemer, Jul 13 2000

Keywords

• nonn
• easy

Comments

These primes correspond to resulting primes for A232210, when A232210(n)=1. - Vladimir Shevelev, Oct 16 2014

Examples

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

Links

• Michael De Vlieger, Table of n, a(n) for n = 1..10000

Crossrefs

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

Programs

Mathematica

Select[Prime@ Range@ 630, PrimeQ[(# - 3)/10] &] (* Michael De Vlieger, Jul 14 2017 *)

PARI

lista(nn) = {forprime(p=2, nn, if (isprime(q=10*p+3), print1(q, ", ")););} \\ Michel Marcus, Oct 20 2014

Formula

a(n) = 10*A023238(n) + 3. - R. J. Mathar, Sep 21 2009