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

11, 11177, 11777, 22111, 22277, 22777, 33311, 33377, 44111, 44777, 55333, 55511, 77711, 77999, 88811, 1100777, 1110077, 1111333, 1115533, 1115599, 1116677, 1117799, 1133333, 1133777, 1144333, 1144477, 1144499, 1155577, 1166677

Offset

1,1

Links

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

Mathematica

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

Crossrefs

Cf. A113615.

Sequence in context: A267359 A267940 A113615 * A075854 A050786 A228566

Adjacent sequences: A034870 A034871 A034872 * A034874 A034875 A034876

Keyword

easy,nonn,base

Author

Erich Friedman

Extensions

Definition clarified by Harvey P. Dale, Dec 04 2022

Status

approved