A373064 - OEIS

%I #11 May 25 2024 15:32:47

%S 0,1,2,3,4,5,6,7,8,9,1,1,2,3,4,5,6,7,8,9,2,2,2,3,4,5,6,7,8,9,3,3,3,3,

%T 4,5,6,7,8,9,4,4,4,4,4,5,6,7,8,9,5,5,5,5,5,5,6,7,8,9,6,6,6,6,6,6,6,7,

%U 8,9,7,7,7,7,7,7,7,7,8,9,8,8,8,8,8,8,8,8,8,9,9,9,9,9,9,9,9,9,9,9,0,1,2,3,4

%N The mode of the digits of n (using largest mode if multimodal).

%C First differs from A054055 at n = 100.

%H Paolo Xausa, <a href="/A373064/b373064.txt">Table of n, a(n) for n = 0..10000</a>

%e a(100) = 0 because 0 is the digit occurring with the highest frequency in 100.

%e a(123300) = 3 because both 0 and 3 occur with the (same) highest frequency in 123300, and 3 is the largest digit.

%t Array[Max[Commonest[IntegerDigits[#]]] &, 120, 0]

%o (Python)

%o from statistics import multimode

%o def a(n): return int(max(multimode(str(n))))

%o print([a(n) for n in range(105)]) # _Michael S. Branicky_, May 21 2024

%Y Cf. A054055, A115353.

%K nonn,base,easy

%O 0,3

%A _Paolo Xausa_, May 21 2024