This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.
%I A039111 #15 Nov 03 2024 19:20:52 %S A039111 0,1,2,3,4,5,6,9,10,11,12,13,14,15,18,19,20,21,22,23,24,27,28,29,30, %T A039111 31,32,33,36,37,38,39,40,41,42,45,46,47,48,49,50,51,54,55,56,57,58,59, %U A039111 60,71,79,81,82,83,84,85,86,87,90,91,92,93,94,95,96,99,100,101,102 %N A039111 Numbers whose base-9 representation has the same number of 7's and 8's. %t A039111 okQ[n_]:=Module[{idn9=IntegerDigits[n,9]},Count[idn9,7]==Count[idn9,8]] %t A039111 Select[Range[0,110],okQ] (* _Harvey P. Dale_, Dec 14 2010 *) %t A039111 Select[Range[0,120],DigitCount[#,9,7]==DigitCount[#,9,8]&] (* _Harvey P. Dale_, Nov 03 2024 *) %Y A039111 Cf. A007095. %K A039111 nonn,base,easy %O A039111 1,3 %A A039111 _Olivier Gérard_