A034873 - OEIS

%I #8 Dec 04 2022 18:30:40

%S 11,11177,11777,22111,22277,22777,33311,33377,44111,44777,55333,55511,

%T 77711,77999,88811,1100777,1110077,1111333,1115533,1115599,1116677,

%U 1117799,1133333,1133777,1144333,1144477,1144499,1155577,1166677

%N Primes in which each digit occurs in runs of at least 2.

%t Select[ Prime[ Range[ 10^5 ] ], Min @@ Length /@ Split[ IntegerDigits[ # ] ] > 1 & ] (* _Ray Chandler_, Jan 24 2006 *)

%Y Cf. A113615.

%K easy,nonn,base

%O 1,1

%A _Erich Friedman_

%E Definition clarified by _Harvey P. Dale_, Dec 04 2022