%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_