A062333 Primes starting and ending with 3.

3, 313, 353, 373, 383, 3023, 3083, 3163, 3203, 3253, 3313, 3323, 3343, 3373, 3413, 3433, 3463, 3533, 3583, 3593, 3613, 3623, 3643, 3673, 3733, 3793, 3803, 3823, 3833, 3853, 3863, 3923, 3943, 30013, 30103, 30113, 30133, 30203, 30223, 30253, 30293

Offset

0,1

Comments

Intersection of A045709 and A030431. - Michel Marcus, Jun 08 2013

Links

Harry J. Smith, Table of n, a(n) for n = 0..1000

Example

3413 is a member, as it is a prime and the first and the last digits are both 3.

Mathematica

se3Q[n_]:=Module[{idn=IntegerDigits[n]}, idn[[1]]==idn[[-1]]==3]; Select[ Prime[ Range[3300]], se3Q] (* Harvey P. Dale, Jul 24 2019 *)

Prog

(PARI) { n=-1; t=log(10); forprime (p=2, 5*10^5, if ((p-10*(p\10)) == 3 && (p\10^(log(p)\t)) == 3, write("b062333.txt", n++, " ", p); if (n==1000, break)) ) } \\ Harry J. Smith, Aug 05 2009

Crossrefs

Cf. A062332, A062334, A062335.

Sequence in context: A074327 A179109 A316329 * A222725 A303893 A305285

Adjacent sequences: A062330 A062331 A062332 * A062334 A062335 A062336

Keyword

nonn,base,easy

Author

Amarnath Murthy, Jun 21 2001

Extensions

More terms from Larry Reeves (larryr(AT)acm.org), Jun 29 2001

Status

approved