A043583 - OEIS

%I #13 Jun 11 2024 19:11:17

%S 10,11,15,16,19,20,21,23,28,29,31,35,37,38,42,43,45,49,51,52,55,56,58,

%T 62,63,66,68,71,73,74,75,77,82,83,85,89,94,107,109,110,112,116,118,

%U 119,123,124,126,130,132,133,135,148,153,157,159

%N Numbers whose base-3 representation has exactly 3 runs.

%t Select[Range[200],Length[Split[IntegerDigits[#,3]]]==3&]  (* _Harvey P. Dale_, Jun 11 2024 *)

%Y Cf. A007089.

%K nonn,base

%O 1,1

%A _Clark Kimberling_