login
Numbers whose number of runs in the base-2 representation is congruent to 3 mod 7.
1

%I #13 Oct 06 2023 03:30:24

%S 5,9,11,13,17,19,23,25,27,29,33,35,39,47,49,51,55,57,59,61,65,67,71,

%T 79,95,97,99,103,111,113,115,119,121,123,125,129,131,135,143,159,191,

%U 193,195,199,207,223,225,227,231,239,241,243,247

%N Numbers whose number of runs in the base-2 representation is congruent to 3 mod 7.

%H Harvey P. Dale, <a href="/A043742/b043742.txt">Table of n, a(n) for n = 1..2500</a>

%t Select[Range[250],Mod[Length[Split[IntegerDigits[#,2]]],7]==3&] (* _Harvey P. Dale_, Mar 30 2022 *)

%K nonn,base

%O 1,1

%A _Clark Kimberling_