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 A378080 #16 Nov 21 2024 09:05:27
%S A378080 0,1,3,4,5,6,7,8,13,14,16,17,18,20,22,23,24,25,26,27,28,29,30,31,32,
%T A378080 33,34,36,39,40,43,45,46,47,48,51,53,54,55,57,58,59,60,61,62,63,64,65,
%U A378080 66,67,68,69,70,71,72,73,74,76,77,79,80,81,82,83,84,85,86,87
%N A378080 Nonnegative integers that are not digitally balanced in any integer base b >= 2.
%C A378080 A digitally balanced number in base b contains every digit from 0 to b-1 in equal amount.
%C A378080 Since the terms in this sequence are not digitally balanced in any base, we could call them "digitally imbalanced numbers".
%H A378080 Paolo Xausa, <a href="/A378080/b378080.txt">Table of n, a(n) for n = 1..10000</a>
%H A378080 Giovanni Resta, <a href="https://www.numbersaplenty.com/set/balanced_number/">Digitally balanced numbers</a>, Numbers Aplenty, 2013.
%t A378080 A378080Q[n_] := Module[{b = 1, len}, While[(len = IntegerLength[n, ++b]) >= b && !(Divisible[len, b] && SameQ @@ DigitCount[n, b])]; len < b];
%t A378080 Select[Range[0, 150], A378080Q]
%Y A378080 Complement of A378073.
%Y A378080 Positions of zeros in A378191.
%Y A378080 Cf. A378000, A378104.
%K A378080 nonn,base
%O A378080 1,3
%A A378080 _Paolo Xausa_, Nov 16 2024