The OEIS is supported by the many generous donors to the OEIS Foundation.
%I #3 Mar 30 2012 17:26:15
%S 5,7,59,67,79,89,97,557,569,577,587,599,659,677,757,769,787,797,857,
%T 859,877,887,967,977,997,5557,5569,5657,5659,5669,5689,5779,5857,5867,
%U 5869,5879,5897,5987,6569,6577,6599,6659,6679,6689,6779,6857,6869,6899,6959
%N Primes with minimal digit > 4.
%t Select[Prime[Range[1000]], Min[IntegerDigits[ # ]]>4&]
%K nonn,base
%O 1,1
%A _Zak Seidov_, May 07 2005