%I #6 Oct 11 2019 16:32:40
%S 11,11177,11551,11717,11777,12211,13313,13331,14411,15511,15551,16661,
%T 17117,18181,19919,19991,21121,21211,21221,22111,22277,22727,22777,
%U 27277,32233,32323,33113,33223,33311,33377,33773,35353,35533,37337
%N Primes in which the frequency of every digit is also prime.
%e 11777 is a term as it contains two ones and three sevens.
%t Select[Prime[Range[10^4]], And @@ PrimeQ /@ Length /@ Split[Sort[IntegerDigits[ # ]]] &] (* _Ray Chandler_, Nov 11 2005 *)
%K base,nonn
%O 1,1
%A _Amarnath Murthy_, Nov 09 2005
%E Corrected and extended by _Ray Chandler_, Nov 11 2005