A113615 Primes in which the frequency of every digit is also prime.

11, 11177, 11551, 11717, 11777, 12211, 13313, 13331, 14411, 15511, 15551, 16661, 17117, 18181, 19919, 19991, 21121, 21211, 21221, 22111, 22277, 22727, 22777, 27277, 32233, 32323, 33113, 33223, 33311, 33377, 33773, 35353, 35533, 37337

Offset

1,1

Links

Table of n, a(n) for n=1..34.

Example

11777 is a term as it contains two ones and three sevens.

Mathematica

Select[Prime[Range[10^4]], And @@ PrimeQ /@ Length /@ Split[Sort[IntegerDigits[ # ]]] &] (* Ray Chandler, Nov 11 2005 *)

Crossrefs

Sequence in context: A066945 A267359 A267940 * A034873 A075854 A050786

Adjacent sequences: A113612 A113613 A113614 * A113616 A113617 A113618

Keyword

base,nonn

Author

Amarnath Murthy, Nov 09 2005

Extensions

Corrected and extended by Ray Chandler, Nov 11 2005

Status

approved