|
%I #7 Sep 03 2015 19:05:06
%S 1092,1094,1095,1096,1097,1099,1100,1101,1102,1121,1122,1123,1124,
%T 1126,1127,1132,1133,1134,1137,1138,1139,1140,1142,1143,1144,1145,
%U 1147,1156,1158,1159,1160,1161,1163,1164,1165,1166
%N Numbers n such that number of runs in the base 4 representation of n is congruent to 6 mod 8.
%t Select[Range[1200],Mod[Length[Split[IntegerDigits[#,4]]],8]==6&] (* _Harvey P. Dale_, Sep 03 2015 *)
%K nonn,base
%O 1,1
%A _Clark Kimberling_
|
