A175275 Base-3 pandigital primes: primes having at least one of each digit 0,1,2 when written in base 3.
11, 19, 29, 47, 59, 61, 73, 83, 89, 97, 101, 103, 107, 113, 127, 137, 139, 163, 167, 173, 179, 181, 191, 193, 197, 199, 223, 227, 251, 257, 263, 269, 277, 281, 293, 307, 311, 313, 317, 331, 347, 349, 353, 359, 379, 383, 389, 397, 409, 419, 421, 431, 433, 439
Offset: 1
Links
- Amiram Eldar, Table of n, a(n) for n = 1..10000
- Alonso Del Arte, Classifications of prime numbers - By representation in specific bases, OEIS Wiki as of Mar 19 2010.
Crossrefs
Programs
-
Mathematica
Select[Range[500], Min @ DigitCount[#, 3] > 0 && PrimeQ[#] &] (* Amiram Eldar, Apr 13 2021 *)
-
PARI
base(n,b=16,s=0)={local(a=[n%b]);while(0
9,s,48)+a[i])),a)} forprime(p=1,999,#Set(base(p,3))==3&print1(p","))