|
%I #13 Jun 30 2021 04:32:56
%S 40,80,161,201,282,322,370,381,392,414,425,436,440,441,442,444,445,
%T 446,448,449,450,458,469,480,524,564,645,685,766,806,850,861,872,880,
%U 881,882,884,885,886,888,889,890,894,905,916,938,949,960,1008,1048
%N Numbers whose base-11 representation has the same nonzero number of 3's and 7's.
%t Select[Range[1100],DigitCount[#,11,3]==DigitCount[#,11,7]>0&] (* _Harvey P. Dale_, Jul 18 2011 *)
%K nonn,base,easy
%O 1,1
%A _Olivier Gérard_
|
