login
Primes containing a digit 6.
3

%I #13 Sep 05 2024 19:14:20

%S 61,67,163,167,263,269,367,461,463,467,563,569,601,607,613,617,619,

%T 631,641,643,647,653,659,661,673,677,683,691,761,769,863,967,1061,

%U 1063,1069,1163,1361,1367,1567,1601,1607,1609,1613,1619,1621,1627,1637,1657,1663

%N Primes containing a digit 6.

%C Subsequence of A011536 and A062673.

%H Amiram Eldar, <a href="/A284291/b284291.txt">Table of n, a(n) for n = 1..10000</a>

%t Select[Range[2000], PrimeQ[#] && MemberQ[IntegerDigits[#], 6] &] (* _Amiram Eldar_, Nov 09 2019 *)

%o (Magma) [p: p in PrimesUpTo(10000) | 6 in Intseq(p)];

%Y 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), A284292 (k = 8), A106093 (k = 9).

%K nonn,base

%O 1,1

%A _Jaroslav Krizek_, Mar 24 2017