A386029 Primes having only {0, 1, 4, 7} as digits.

7, 11, 17, 41, 47, 71, 101, 107, 401, 701, 1117, 1171, 1447, 1471, 1741, 1747, 1777, 4001, 4007, 4111, 4177, 4441, 4447, 7001, 7177, 7411, 7417, 7477, 7717, 7741, 10007, 10111, 10141, 10177, 10477, 10711, 10771, 11047, 11071, 11117, 11171, 11177, 11411, 11447

Offset: 1

Author

Jason Bard, Jul 14 2025

Keywords

• nonn
• base
• easy

Links

• Jason Bard, Table of n, a(n) for n = 1..10000
• Index to entries for primes with digits in a given set

Crossrefs

Supersequence of A079651, A199327, A260266.

Cf. A000040, A385776.

Programs

Magma

[p: p in PrimesUpTo(10^6) | Set(Intseq(p)) subset [0, 1, 4, 7]];

Mathematica

Select[FromDigits /@ Tuples[{0, 1, 4, 7}, n], PrimeQ]

PARI

primes_with(, 1, [0, 1, 4, 7]) \\ uses function in A385776

Python

print(list(islice(primes_with("0147"), 41))) # uses function/imports in A385776