|
%I #10 Sep 08 2022 08:46:19
%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
|
