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 A371383 #15 Mar 22 2024 19:18:57 %S A371383 0,1,2,3,4,5,6,7,8,9,1,1,3,2,5,3,7,4,9,5,1,3,2,5,3,7,4,9,5,11,3,2,5,3, %T A371383 7,4,9,5,11,6,2,5,3,7,4,9,5,11,6,13,5,3,7,4,9,5,11,6,13,7,3,7,4,9,5, %U A371383 11,6,13,7,15,7,4,9,5,11,6,13,7,15,8,4,9,5,11,6 %N A371383 a(n) is the numerator of the arithmetic mean of the digits of n. %H A371383 Stefano Spezia, <a href="/A371383/b371383.txt">Table of n, a(n) for n = 0..10000</a> %H A371383 <a href="/index/Coi#Colombian">Index entries for Colombian or self numbers and related sequences</a>. %t A371383 a[n_]:=Numerator[Mean[IntegerDigits[n]]]; Array[a,85,0] %o A371383 (Python) %o A371383 from math import gcd %o A371383 def A371383(n): return (l:=sum(map(int,(s:=str(n)))))//gcd(l,len(s)) # _Chai Wah Wu_, Mar 22 2024 %Y A371383 Cf. A004426, A004427, A007953, A055642, A061383, A371384 (denominator). %K A371383 nonn,base,easy,frac %O A371383 0,3 %A A371383 _Stefano Spezia_, Mar 20 2024