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

2, 11, 41, 181, 211, 241, 281, 421, 811, 821, 881, 1181, 1481, 1811, 2111, 2141, 2221, 2281, 2411, 2441, 4111, 4211, 4241, 4421, 4441, 4481, 8111, 8221, 8821, 11411, 11821, 12211, 12241, 12281, 12421, 12821, 12841, 14221, 14281, 14411, 14821, 18121, 18181, 18211

Offset

1,1

Links

Jason Bard, Table of n, a(n) for n = 1..10000

Index to entries for primes with digits in a given set

Example

11 is in this sequence because 1 is an integer power of 2.
13 is not in this sequence because 3 is not an integer power of 2.

Mathematica

nmax = 8; Flatten[Table[Select[FromDigits /@ Tuples[{1, 2, 4, 8}, n], PrimeQ], {n, 1, nmax}]]

Prog

(PARI) is(n)=isprime(n) && #setminus(Set(digits(n)), [1, 2, 4, 8])==0 \\ Charles R Greathouse IV, Apr 24 2025

Crossrefs

Subsequence of A173580. Intersection of A028846 and A000040.

Supersequence of A260267, A260270.

Cf. A381259, A066593.

Sequence in context: A121244 A203574 A070778 * A260267 A128241 A258937

Adjacent sequences: A383368 A383369 A383370 * A383372 A383373 A383374

Keyword

nonn,base,easy

Author

Jason Bard, Apr 24 2025

Status

approved