A260829 Primes having only {5, 6, 7} as digits.
5, 7, 67, 557, 577, 677, 757, 5557, 5657, 6577, 7577, 7757, 55667, 56767, 57557, 57667, 65557, 65657, 65677, 65777, 67567, 67577, 67757, 67777, 75557, 75577, 75767, 76667, 76757, 76777, 77557, 555557, 555677, 555767, 557567, 565567, 565667, 566557, 566567
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^6) | Set(Intseq(p)) subset [5,6,7]];
-
Mathematica
Select[Prime[Range[2 10^5]], Complement[IntegerDigits[#], {5, 6, 7}] == {} &]
Comments