A175276 Base-4 pandigital primes: primes having at least one of each digit 0,1,2,3, when written in base 4.
283, 313, 331, 397, 419, 433, 457, 541, 557, 569, 587, 647, 653, 659, 709, 809, 929, 1051, 1063, 1069, 1123, 1163, 1171, 1181, 1187, 1201, 1213, 1249, 1259, 1291, 1307, 1319, 1327, 1423, 1427, 1459, 1481, 1483, 1543, 1549, 1559, 1567, 1571, 1579, 1583
Offset: 1
Links
- Amiram Eldar, Table of n, a(n) for n = 1..10000 (terms 1..1000 from Harvey P. Dale)
- Alonso Del Arte, Classifications of prime numbers - By representation in specific bases, OEIS Wiki as of Mar 19 2010.
Crossrefs
Programs
-
Mathematica
Select[Prime[Range[300]],Min[DigitCount[#,4]]>0&] (* Harvey P. Dale, Apr 15 2012 *)
-
PARI
base(n,b=4,s=0)={local(a=[n%b]);while(0
9,s,48)+a[i])),a)} forprime(p=1,1999,#Set(base(p,4))==4 & print1(p","))