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,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.

Mathematica

Select[Prime[Range[300]], Min[DigitCount[#, 4]]>0&] (* Harvey P. Dale, Apr 15 2012 *)

Prog

(PARI) base(n, b=4, s=0)={local(a=[n%b]); while(0<n\=b, a=concat(n%b, a)); if(s, s=32*s+23; Strchr(vectorsmall(#a, i, if(a[i]>9, s, 48)+a[i])), a)}
forprime(p=1, 1999, #Set(base(p, 4))==4 & print1(p", "))

Crossrefs

Cf. A050288, A138837, A175271, A175272, A175273, A175274, A175275, A175277, A175278, A175279, A175280.

Sequence in context: A172804 A340160 A334106 * A334096 A142937 A081424

Adjacent sequences: A175273 A175274 A175275 * A175277 A175278 A175279

Keyword

nonn,base

Author

M. F. Hasler, May 27 2010

Status

approved