|
%I #7 Jul 29 2021 15:53:06
%S 4369,4370,4371,4376,4377,4379,4380,4381,4382,4385,4386,4387,4388,
%T 4390,4391,4396,4397,4398,4401,4402,4403,4404,4406,4407,4408,4409,
%U 4411,4484,4486,4487,4488,4489,4491,4492,4493,4494
%N Numbers n such that number of runs in the base 4 representation of n is congruent to 7 mod 8.
%t Select[Range[4500],Mod[Length[Split[IntegerDigits[#,4]]],8]==7&] (* _Harvey P. Dale_, Jul 29 2021 *)
%K nonn,base
%O 1,1
%A _Clark Kimberling_
|
