%I #12 Apr 25 2021 12:15:27
%S 2210,2212,2213,2214,2215,2216,2217,2218,2219,2220,2221,2222,2223,
%T 2224,2226,2227,2228,2229,2230,2231,2232,2233,2234,2235,2236,2237,
%U 2238,2240,2241,2242,2243,2244,2245,2246,2247,2248
%N Numbers whose base-13 representation has exactly 4 runs.
%t Select[Range[2300],Length[Split[IntegerDigits[#,13]]]==4&] (* _Harvey P. Dale_, Mar 07 2012 *)
%K nonn,base
%O 1,1
%A _Clark Kimberling_