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.

A260226 Primes having only {3, 5, 8} as digits.

This page as a plain text file.
%I A260226 #11 Jul 21 2025 00:46:33
%S A260226 3,5,53,83,353,383,853,883,3533,3583,3833,3853,5333,8353,33353,33533,
%T A260226 35353,35533,38333,38833,53353,55333,83383,83833,85333,85853,88853,
%U A260226 88883,333383,333533,335383,335833,338383,353333,353833,355853,383533,383833,533353
%N A260226 Primes having only {3, 5, 8} as digits.
%C A260226 A020462 and A020464 are subsequences.
%H A260226 Alois P. Heinz, <a href="/A260226/b260226.txt">Table of n, a(n) for n = 1..10000</a>
%H A260226 <a href="/index/Pri#PrimesWithDigits">Index to entries for primes with digits in a given set</a>
%t A260226 Select[Prime[Range[5 10^4]], Complement[IntegerDigits[#], {3, 5, 8}]=={} &]
%t A260226 Select[Flatten[Table[FromDigits/@Tuples[{3,5,8},n],{n,6}]],PrimeQ] (* or  *) Join[{3,5},Select[10#+3&/@Flatten[Table[FromDigits/@Tuples[{3,5,8},n],{n,5}]],PrimeQ]] (* The second program is faster because it recognizes that, except only for 5, each such prime must end in 3. *) (* _Harvey P. Dale_, Jul 17 2020 *)
%o A260226 (Magma) [p: p in PrimesUpTo(2*10^6) | Set(Intseq(p)) subset [3, 5, 8]];
%Y A260226 Cf. similar sequences listed in A260223.
%Y A260226 Cf. A020462, A020464.
%K A260226 nonn,easy,base
%O A260226 1,1
%A A260226 _Vincenzo Librandi_, Jul 22 2015