login
Primes having only {2, 4, 7, 8} as digits.
1

%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