login
Numbers whose maximal base 4 run length is 2.
1

%I #9 Apr 09 2023 08:56:22

%S 5,10,15,16,20,22,23,26,31,32,37,40,41,43,47,48,53,58,60,61,62,65,66,

%T 67,69,74,79,80,81,82,83,88,89,90,91,92,93,94,95,96,101,104,105,107,

%U 111,112,117,122,124,125,126,129,130,131,133,138,143,144,148,150

%N Numbers whose maximal base 4 run length is 2.

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

%Y Cf. A043278.

%K nonn,base

%O 1,1

%A _Clark Kimberling_

%E More terms from _Harvey P. Dale_, Apr 09 2023