cp's OEIS Frontend

A284292 Primes containing a digit 8.

%I A284292 #26 Jul 28 2025 20:43:08
%S A284292 83,89,181,281,283,383,389,487,587,683,787,809,811,821,823,827,829,
%T A284292 839,853,857,859,863,877,881,883,887,983,1087,1181,1187,1283,1289,
%U A284292 1381,1481,1483,1487,1489,1583,1783,1787,1789,1801,1811,1823,1831,1847,1861,1867
%N A284292 Primes containing a digit 8.
%C A284292 Subsequence of A011538 and A062677.
%C A284292 Differs from A062677 which contains also the composites 6889 = 83^2, 7387 = 83*89, 23489=83*283, 25187=89*283, 31789 = 83*383 etc. - _R. J. Mathar_, Mar 27 2017
%H A284292 Robert Israel, <a href="/A284292/b284292.txt">Table of n, a(n) for n = 1..10000</a>
%p A284292 isA284292 := proc(n)
%p A284292     if isprime(n) then
%p A284292         convert(convert(n,base,10),set) ;
%p A284292         if 8 in % then
%p A284292             true;
%p A284292         else
%p A284292             false;
%p A284292         end if;
%p A284292     else
%p A284292         false;
%p A284292     end if;
%p A284292 end proc:
%p A284292 for n from 1 to 2000 do
%p A284292     if isA284292(n) then
%p A284292         printf("%d,",n) ;
%p A284292     end if;
%p A284292 end do: # _R. J. Mathar_, Mar 27 2017
%t A284292 Select[Prime@ Range@ 500, MemberQ[ IntegerDigits@ #, 8] &] (* _Giovanni Resta_, Mar 25 2017 *)
%o A284292 (Magma) [p: p in PrimesUpTo(10000) | 8 in Intseq(p)];
%o A284292 (Python)
%o A284292 from sympy import primerange
%o A284292 print([n for n in primerange(2, 2000) if '8' in str(n)]) # _Indranil Ghosh_, Mar 25 2017
%Y A284292 Cf. Primes containing a digit k for k = 0 - 9: A056709 (k = 0), A208270 (k = 1), A208272 (k = 2), A212525 (k = 3), A284290 (k = 4), A257667 (k = 5), A284291 (k = 6), A257668 (k = 7), this sequence (k = 8), A106093 (k = 9).
%K A284292 nonn,base
%O A284292 1,1
%A A284292 _Jaroslav Krizek_, Mar 25 2017