%I #14 Nov 20 2019 19:14:51
%S 2,3,5,11,13,23,31,41,43,53,61,101,103,113,131,151,163,211,223,233,
%T 241,251,263,311,313,331,353,401,421,431,433,443,461,463,503,521,523,
%U 541,563,601,613,631,641,643,653,661,1013,1021,1031,1033,1051,1061,1063
%N Primes containing only digits from the set (0,1,2,3,4,5,6).
%H James Maynard and Brady Haran, <a href="https://www.youtube.com/watch?v=eeoBCS7IEqs">Primes without a 7</a>, Numberphile video (2019)
%t Select[Prime[Range[200]],Max[IntegerDigits[#]]<7&] (* _Harvey P. Dale_, Feb 08 2019 *)
%Y Cf. A036952-A036964.
%K nonn,base
%O 1,1
%A _Patrick De Geest_, Jan 04 1999
%E Offset 1 from _Michel Marcus_, Oct 10 2019