A156553 Primes where the first digit is not a prime but all the other digits are primes.

13, 17, 43, 47, 67, 83, 97, 127, 137, 157, 173, 433, 457, 653, 673, 677, 823, 827, 853, 857, 877, 937, 953, 977

Offset

1,1

Links

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

Chris Caldwell, The First 1,000 Primes

Example

977 is a prime in which the first digit is not a prime but all the other digits are primes.

Mathematica

dpQ[p_]:=With[{idp=IntegerDigits[p]}, !PrimeQ[idp[[1]]]&&AllTrue[Rest[idp], PrimeQ]]; Select[Prime[Range[200]], dpQ] (* Harvey P. Dale, Aug 09 2025 *)

Crossrefs

Cf. A000040

Sequence in context: A239901 A068497 A125524 * A248474 A140533 A180527

Adjacent sequences: A156550 A156551 A156552 * A156554 A156555 A156556

Keyword

nonn,base

Author

Parthasarathy Nambi, Feb 09 2009

Status

approved