A068161 Smallest prime beginning and ending in at least n 3's.

3, 33533, 3331333, 3333133333, 333331033333, 33333362333333, 333333313333333, 333333332933333333, 33333333316333333333, 3333333333133333333333, 33333333333733333333333

Offset

1,1

Links

Harvey P. Dale, Table of n, a(n) for n = 1..100

Example

a(2) = 33533 is a prime that starts with 33 and ends in 33 (two 3's).

Mathematica

Join[{3}, Table[With[{c=PadRight[{}, n, 3]}, Module[{k=1}, While[!PrimeQ[FromDigits[Join[c, IntegerDigits[k], c]]], k++]; FromDigits[Join[c, IntegerDigits[k], c]]]], {n, 2, 15}]] (* Harvey P. Dale, Sep 02 2025 *)

Crossrefs

Cf. A068160.

Sequence in context: A175875 A030463 A086509 * A116313 A140656 A135760

Adjacent sequences: A068158 A068159 A068160 * A068162 A068163 A068164

Keyword

base,nonn

Author

Amarnath Murthy, Feb 24 2002

Extensions

Corrected and extended by Robert Gerbicz, Sep 06 2002

Status

approved