A260831 Primes having only {5, 7, 9} as digits.
5, 7, 59, 79, 97, 557, 577, 599, 757, 797, 977, 997, 5557, 5779, 7559, 7577, 7757, 7759, 55579, 55799, 55997, 57557, 57559, 57977, 59557, 59779, 59797, 59957, 59999, 75557, 75577, 75797, 75979, 75997, 77557, 77797, 77977, 77999, 79559, 79579, 79757, 79777
Offset: 1
Links
- Alois P. Heinz, Table of n, a(n) for n = 1..10000
- James Maynard and Brady Haran, Primes without a 7, Numberphile video (2019)
- Index to entries for primes with digits in a given set
Programs
-
Magma
[p: p in PrimesUpTo(2*10^5) | Set(Intseq(p)) subset [5, 7, 9]];
-
Mathematica
Select[Prime[Range[2 10^5]], Complement[IntegerDigits[#], {5, 7, 9}] == {} &]
Comments