A043755 - OEIS

%I #7 May 22 2014 17:01:06

%S 1,3,7,15,31,63,127,255,511,682,1023,1194,1322,1354,1362,1364,1366,

%T 1370,1386,1450,1706,2047,2218,2346,2378,2386,2388,2390,2394,2410,

%U 2474,2602,2634,2642,2644,2646,2650,2666,2698,2706

%N Numbers n such that number of runs in the base 2 representation of n is congruent to 1 mod 9.

%t Select[Range[3000],Mod[Length[Split[IntegerDigits[#,2]]],9]==1&] (* _Harvey P. Dale_, May 22 2014 *)

%K nonn,base

%O 1,2

%A _Clark Kimberling_