A386040 Primes having only {0, 1, 8, 9} as digits.

11, 19, 89, 101, 109, 181, 191, 199, 809, 811, 881, 911, 919, 991, 1009, 1019, 1091, 1109, 1181, 1801, 1811, 1889, 1901, 1999, 8009, 8011, 8081, 8089, 8101, 8111, 8191, 8819, 8999, 9001, 9011, 9091, 9109, 9181, 9199, 9811, 9901, 10009, 10091, 10099, 10111, 10181

Offset

1,1

Links

Jason Bard, Table of n, a(n) for n = 1..10000

Index to entries for primes with digits in a given set

Mathematica

Select[FromDigits /@ Tuples[{0, 1, 8, 9}, 5], PrimeQ]

Prog

(Magma) [p: p in PrimesUpTo(10^6) | Set(Intseq(p)) subset [0, 1, 8, 9]];
(Python) print(list(islice(primes_with("0189"), 41))) # uses function/imports in A385776
(PARI) primes_with(, 1, [0, 1, 8, 9]) \\ uses function in A385776

Crossrefs

Supersequence of A061247, A199329, A385783.

Cf. A000040, A385776.

Sequence in context: A107637 A229542 A039365 * A103201 A199338 A385783

Adjacent sequences: A386037 A386038 A386039 * A386041 A386042 A386043

Keyword

nonn,base,easy

Author

Jason Bard, Jul 15 2025

Extensions

Mathematica program corrected by Harvey P. Dale, Nov 25 2025

Status

approved