A106103 Primes with minimal digit = 3.

3, 37, 43, 53, 73, 83, 337, 347, 349, 353, 359, 367, 373, 379, 383, 389, 397, 433, 439, 443, 463, 563, 593, 643, 653, 673, 683, 733, 739, 743, 773, 839, 853, 863, 883, 937, 953, 983

Offset

1,1

Links

Table of n, a(n) for n=1..38.

Mathematica

Select[Prime[Range[200]], Min[IntegerDigits[ # ]]==3&]

Crossrefs

Sequence in context: A116184 A037000 A042333 * A224471 A286637 A106996

Adjacent sequences: A106100 A106101 A106102 * A106104 A106105 A106106

Keyword

nonn,base

Author

Zak Seidov, May 07 2005

Status

approved