A037993 Numbers whose maximal base-8 run length is 2.

9, 18, 27, 36, 45, 54, 63, 64, 72, 74, 75, 76, 77, 78, 79, 82, 91, 100, 109, 118, 127, 128, 137, 144, 145, 147, 148, 149, 150, 151, 155, 164, 173, 182, 191, 192, 201, 210, 216, 217, 218, 220, 221, 222, 223, 228, 237, 246, 255, 256

Offset

1,1

Links

Paolo Xausa, Table of n, a(n) for n = 1..10000

Mathematica

Select[Range[300], Max[Map[Length, Split[IntegerDigits[#, 8]]]] == 2 &] (* Paolo Xausa, May 25 2026 *)

Crossrefs

Cf. A043094 (max run length 1).

Cf. A007094.

Sequence in context: A037337 A119310 A373839 * A044849 A282149 A114612

Adjacent sequences: A037990 A037991 A037992 * A037994 A037995 A037996

Keyword

nonn,base,changed

Author

Clark Kimberling

Status

approved