Voozh

A386074

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

7, 47, 487, 787, 877, 887, 4007, 4447, 4787, 4877, 7477, 7487, 7877, 8087, 8447, 8707, 8747, 8807, 8887, 40087, 40487, 40787, 40847, 44087, 44777, 44887, 47087, 47407, 47777, 47807, 48407, 48487, 48787, 48847, 70487, 70877, 74047, 74077, 74707, 74747, 74887, 77047

(list; graph; refs; listen; history; text; internal format)

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, 4, 7, 8}, n], PrimeQ]

PROG

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

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

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