Voozh

A386075

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

7, 47, 79, 97, 409, 449, 479, 499, 709, 797, 907, 947, 977, 997, 4007, 4049, 4079, 4099, 4409, 4447, 4799, 4909, 4999, 7079, 7477, 7499, 7907, 7949, 9007, 9049, 9479, 9497, 9749, 9907, 9949, 40009, 40099, 40499, 40709, 40949, 44449, 44497, 44777, 44797, 44909

(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, 9}, n], PrimeQ]

PROG

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

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

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