A152312 Primes without odd prime digits.

2, 11, 19, 29, 41, 61, 89, 101, 109, 149, 181, 191, 199, 211, 229, 241, 269, 281, 401, 409, 419, 421, 449, 461, 491, 499, 601, 619, 641, 661, 691, 809, 811, 821, 829, 881, 911, 919, 929, 941, 991, 1009, 1019, 1021, 1049, 1061, 1069, 1091, 1109, 1129, 1181, 1201

Offset

1,1

Links

Ashaz Jameel, Table of n, a(n) for n = 1..10000

Mathematica

Select[Prime[Range[250]], FreeQ[IntegerDigits[#], 3 | 5 | 7] &] (* Paolo Xausa, Mar 03 2026 *)

Prog

(Python)
from sympy import isprime
from itertools import count, islice, product
def agen(): # generator of terms
    yield 2
    for d in count(2):
        for first in "124689":
            for mid in product("0124689", repeat=d-2):
                for last in "19":
                    if isprime(t:=int(first + "".join(mid) + last)):
                        yield t
print(list(islice(agen(), 52))) # Michael S. Branicky, Feb 26 2026

Crossrefs

Cf. A019546, A034844, A087363.

Sequence in context: A304811 A064739 A112860 * A386094 A154765 A386101

Adjacent sequences: A152309 A152310 A152311 * A152313 A152314 A152315

Keyword

nonn,base,easy

Author

Omar E. Pol, Dec 02 2008

Status

approved