login
A385799
Primes having only {6, 7, 8} as digits.
7
7, 67, 677, 787, 877, 887, 7687, 7867, 7877, 8677, 8867, 8887, 66877, 67777, 67867, 68687, 68767, 68777, 76667, 76777, 77687, 77867, 78787, 78877, 78887, 86677, 86767, 87767, 87877, 87887, 88667, 88867, 666667, 667687, 667867, 668677, 668687, 668867, 677687, 677767
OFFSET
1,1
MATHEMATICA
Flatten[Table[Select[FromDigits /@ Tuples[{6, 7, 8}, n], PrimeQ], {n, 7}]]
PROG
(Magma) [p: p in PrimesUpTo(10^6) | Set(Intseq(p)) subset [6, 7, 8]];
(Python) print(list(islice(primes_with("678"), 41))) # uses function/imports in A385776
(PARI) primes_with(, 1, [6, 7, 8]) \\ uses function in A385776
CROSSREFS
Subsequence of A030432, A106111.
Supersequence of A020469, A020470.
Sequence in context: A073552 A067275 A036948 * A020469 A386826 A390590
KEYWORD
nonn,base,easy
AUTHOR
Jason Bard, Jul 14 2025
STATUS
approved