%I #13 Sep 21 2024 17:10:05
%S 30,103,130,203,230,301,302,304,305,306,307,308,309,310,320,340,350,
%T 360,370,380,390,403,430,503,530,603,630,703,730,803,830,903,930,1013,
%U 1023,1031,1032,1034,1035,1036,1037,1038,1039,1043,1053,1063,1073
%N Numbers whose base-10 representation has the same nonzero number of 0's and 3's.
%t Select[Range[1250],DigitCount[#,10,0]==DigitCount[#,10,3]>0&] (* _Harvey P. Dale_, Sep 21 2024 *)
%K nonn,base,easy
%O 1,1
%A _Olivier GĂ©rard_