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 A049362 #12 Feb 15 2024 01:54:21 %S A049362 8410815,8411067,8411631,8411871,8411895,8412153,8412855,8413083, %T A049362 8413161,8416095,8416119,8416125,8417133,8417205,8418795,8418999, %U A049362 8419035,8419065,8419743,8419815,8420055,8420217,8420253,8427135 %N A049362 Digitally balanced numbers in bases 2, 3 and 4. %C A049362 Is this sequence infinite? %H A049362 Amiram Eldar, <a href="/A049362/b049362.txt">Table of n, a(n) for n = 1..10000</a> %t A049362 dbQ[n_, b_] := SameQ @@ DigitCount[n, b, Range[0, b - 1]]; With[{digMax = 3, termsNumber = 24}, Select[Union @@ Table[(FromDigits[#, 4] &) /@ Select[Permutations[Flatten[Table[Range[0, 3], k]]], #[[1]] > 0 &], {k, 1, digMax}], dbQ[#, 2] && dbQ[#, 3] &][[1 ;; termsNumber]]] (* _Amiram Eldar_, Feb 15 2024 *) %Y A049362 Intersection of A031443, A049354 and A049355. %K A049362 nonn,base %O A049362 1,1 %A A049362 _Harvey P. Dale_