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,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

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

Sequence in context: A335655 A113912 A327920 * A338821 A104802 A128473

Adjacent sequences: A055779 A055780 A055781 * A055783 A055784 A055785

Keyword

nonn,easy

Author

Labos Elemer, Jul 13 2000

Status

approved