login
A260830
Primes that contain only the digits (5, 7, 8).
2
5, 7, 557, 577, 587, 757, 787, 857, 877, 887, 5557, 5857, 7577, 7757, 7877, 8887, 55787, 57557, 57587, 57787, 58757, 58787, 75557, 75577, 75787, 77557, 77587, 78577, 78787, 78857, 78877, 78887, 85577, 87557, 87587, 87877, 87887, 555557, 555857, 557857, 558587
OFFSET
1,1
COMMENTS
A020467 and A020470 are subsequences.
LINKS
James Maynard and Brady Haran, Primes without a 7, Numberphile video (2019)
MATHEMATICA
Select[Prime[Range[2 10^5]], Complement[IntegerDigits[#], {5, 7, 8}] == {} &]
Select[Flatten[Table[FromDigits/@Tuples[{5, 7, 8}, n], {n, 6}]], PrimeQ] (* Harvey P. Dale, Oct 06 2017 *)
PROG
(Magma) [p: p in PrimesUpTo(2*10^6) | Set(Intseq(p)) subset [5, 7, 8]];
CROSSREFS
Cf. similar sequences listed in A260827.
Sequence in context: A059394 A176960 A114368 * A260827 A020467 A089344
KEYWORD
nonn,easy,base
AUTHOR
Vincenzo Librandi, Aug 02 2015
STATUS
approved