cp's OEIS Frontend

This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.

A175276 Base-4 pandigital primes: primes having at least one of each digit 0,1,2,3, when written in base 4.

This page as a plain text file.
%I A175276 #12 Apr 13 2021 07:15:25
%S A175276 283,313,331,397,419,433,457,541,557,569,587,647,653,659,709,809,929,
%T A175276 1051,1063,1069,1123,1163,1171,1181,1187,1201,1213,1249,1259,1291,
%U A175276 1307,1319,1327,1423,1427,1459,1481,1483,1543,1549,1559,1567,1571,1579,1583
%N A175276 Base-4 pandigital primes: primes having at least one of each digit 0,1,2,3, when written in base 4.
%H A175276 Amiram Eldar, <a href="/A175276/b175276.txt">Table of n, a(n) for n = 1..10000</a> (terms 1..1000 from Harvey P. Dale)
%H A175276 Alonso Del Arte, <a href="http://oeis.org/wiki/Classifications_of_prime_numbers#By_representation_in_specific_bases">Classifications of prime numbers - By representation in specific bases</a>, OEIS Wiki as of Mar 19 2010.
%t A175276 Select[Prime[Range[300]],Min[DigitCount[#,4]]>0&] (* _Harvey P. Dale_, Apr 15 2012 *)
%o A175276 (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)}
%o A175276 forprime(p=1,1999,#Set(base(p,4))==4 & print1(p","))
%Y A175276 Cf. A050288, A138837, A175271, A175272, A175273, A175274, A175275, A175277, A175278, A175279, A175280.
%K A175276 nonn,base
%O A175276 1,1
%A A175276 _M. F. Hasler_, May 27 2010