|
%I #7 Dec 23 2012 11:39:31
%S 21,37,41,43,45,53,69,73,75,77,81,83,87,89,91,93,101,105,107,109,117,
%T 133,137,139,141,145,147,151,153,155,157,161,163,167,175,177,179,183,
%U 185,187,189,197,201,203,205,209,211,215,217
%N Numbers n such that number of runs in the base 2 representation of n is congruent to 5 mod 9.
%H Harvey P. Dale, <a href="/A043759/b043759.txt">Table of n, a(n) for n = 1..1000</a>
%t Select[Range[250],Mod[Length[Split[IntegerDigits[#,2]]],9]==5&] (* _Harvey P. Dale_, Dec 23 2012 *)
%K nonn,base
%O 1,1
%A _Clark Kimberling_
|
