A039400 - OEIS

%I #13 Jun 30 2021 03:54:54

%S 80,108,180,208,280,308,380,408,480,508,580,608,680,708,780,801,802,

%T 803,804,805,806,807,809,810,820,830,840,850,860,870,890,908,980,1018,

%U 1028,1038,1048,1058,1068,1078,1081,1082,1083,1084,1085,1086,1087

%N Numbers whose base-10 representation has the same nonzero number of 0's and 8's.

%t Select[Range[1100],DigitCount[#,10,8]==DigitCount[#,10,0]>0&] (* _Harvey P. Dale_, Jan 13 2017 *)

%K nonn,base,easy

%O 1,1

%A _Olivier Gérard_