|
%I #6 Jul 04 2012 20:41:58
%S 68,70,71,72,73,75,76,77,78,97,98,99,100,102,103,108,109,110,113,114,
%T 115,116,118,119,120,121,123,132,134,135,136,137,139,140,141,142,145,
%U 146,147,152,153,155,156,157,158,177,178,179
%N Number of runs in the base 4 representation of n is congruent to 4 mod 6.
%t Select[Range[200],Mod[Length[Split[IntegerDigits[#,4]]],6]==4&] (* _Harvey P. Dale_, Jul 04 2012 *)
%K nonn,base
%O 1,1
%A _Clark Kimberling_
|
