|
%I
%S 73,83,194,204,315,325,436,446,557,567,678,688,733,744,755,766,777,
%T 788,803,804,805,806,807,808,811,812,813,821,832,843,853,864,875,886,
%U 897,908,913,914,915,916,917,918,921,922,923,941,952,963,1041,1051
%N Numbers n such that representation in base 11 has same nonzero number of 6's and 7's.
%t Select[Range[1100],DigitCount[#,11,6]==DigitCount[#,11,7]>0&] (* From Harvey P. Dale, Feb 14 2012 *)
%K nonn,base,easy
%O 1,1
%A _Olivier Gérard_
|