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.

A215927 Primes having at least one digit that is not prime.

This page as a plain text file.
%I A215927 #29 Sep 08 2022 08:46:03
%S A215927 11,13,17,19,29,31,41,43,47,59,61,67,71,79,83,89,97,101,103,107,109,
%T A215927 113,127,131,137,139,149,151,157,163,167,173,179,181,191,193,197,199,
%U A215927 211,229,239,241,251,263,269,271,281,283,293,307,311,313,317,331,347
%N A215927 Primes having at least one digit that is not prime.
%C A215927 Complement of A019546 within the primes A000040.
%e A215927 19 is in the sequence because neither of its two digits is prime, 1 being a unit and 9 being the square of 3.
%e A215927 23 is not in the sequence because both 2 and 3 are prime.
%e A215927 29 is in the sequence because 9 is not prime (though 2 is).
%t A215927 Select[Prime[Range[100]], Complement[IntegerDigits[#], {2, 3, 5, 7}] != {} &] (* _Alonso del Arte_, Aug 27 2012 *)
%o A215927 (PARI) is_A215927(n)=isprime(n)&apply(x->!isprime(x),eval(Vec(Str(n)))) \\ - _M. F. Hasler_, Aug 27 2012
%o A215927 (Magma) [p: p in PrimesUpTo(500) | not Set(Intseq(p)) subset [2,3,5,7]]; // _Vincenzo Librandi_ Oct 25 2016
%Y A215927 Cf. A000040, A019546, A034844, A033274, A152313, A141409.
%K A215927 nonn,base
%O A215927 1,1
%A A215927 _Luca Brigada Villa_, Aug 27 2012
%E A215927 a(55) corrected by _Vincenzo Librandi_, Oct 25 2016