A037977 Numbers whose maximal base 4 run length is 2.

5, 10, 15, 16, 20, 22, 23, 26, 31, 32, 37, 40, 41, 43, 47, 48, 53, 58, 60, 61, 62, 65, 66, 67, 69, 74, 79, 80, 81, 82, 83, 88, 89, 90, 91, 92, 93, 94, 95, 96, 101, 104, 105, 107, 111, 112, 117, 122, 124, 125, 126, 129, 130, 131, 133, 138, 143, 144, 148, 150

Offset

1,1

Links

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

Mathematica

Select[Range[200], Max[Length/@Split[IntegerDigits[#, 4]]]==2&] (* Harvey P. Dale, Apr 09 2023 *)

Crossrefs

Cf. A043278.

Sequence in context: A242128 A270926 A317045 * A044845 A313667 A313668

Adjacent sequences: A037974 A037975 A037976 * A037978 A037979 A037980

Keyword

nonn,base

Author

Clark Kimberling

Extensions

More terms from Harvey P. Dale, Apr 09 2023

Status

approved