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.

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

This page as a plain text file.
%I A175275 #8 Apr 13 2021 07:15:20
%S A175275 11,19,29,47,59,61,73,83,89,97,101,103,107,113,127,137,139,163,167,
%T A175275 173,179,181,191,193,197,199,223,227,251,257,263,269,277,281,293,307,
%U A175275 311,313,317,331,347,349,353,359,379,383,389,397,409,419,421,431,433,439
%N A175275 Base-3 pandigital primes: primes having at least one of each digit 0,1,2 when written in base 3.
%H A175275 Amiram Eldar, <a href="/A175275/b175275.txt">Table of n, a(n) for n = 1..10000</a>
%H A175275 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 A175275 Select[Range[500], Min @ DigitCount[#, 3] > 0 && PrimeQ[#] &] (* _Amiram Eldar_, Apr 13 2021 *)
%o A175275 (PARI) base(n,b=16,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 A175275 forprime(p=1,999,#Set(base(p,3))==3&print1(p","))
%Y A175275 Cf. A050288, A138837, A175271, A175272, A175273, A175274, A175276, A175277, A175278, A175279, A175280.
%K A175275 nonn,base
%O A175275 1,1
%A A175275 _M. F. Hasler_, May 27 2010