%I #6 Jul 18 2025 16:03:06
%S 2,7,47,227,277,487,727,787,827,877,887,2287,2447,2477,2777,2887,4447,
%T 4787,4877,7247,7477,7487,7727,7877,8287,8447,8747,8887,22247,22277,
%U 22447,22727,22777,22787,22877,24247,24847,24877,27277,27427,27487,27827,27847,28277
%N Primes having only {2, 4, 7, 8} as digits.
%H Jason Bard, <a href="/A386157/b386157.txt">Table of n, a(n) for n = 1..10000</a>
%H <a href="/index/Pri#PrimesWithDigits">Index to entries for primes with digits in a given set</a>
%t Flatten[Table[Select[FromDigits /@ Tuples[{2, 4, 7, 8}, n], PrimeQ], {n, 7}]]
%o (Magma) [p: p in PrimesUpTo(10^6) | Set(Intseq(p)) subset [2, 4, 7, 8]];
%o (Python) print(list(islice(primes_with("2478"), 41))) # uses function/imports in A385776
%o (PARI) primes_with(, 1, [2, 4, 7, 8]) \\ uses function in A385776
%Y Supersequence of A385784, A385789, A385795.
%Y Cf. A000040, A030432, A385776.
%K nonn,base,easy
%O 1,1
%A _Jason Bard_, Jul 18 2025