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 A061069 #10 Sep 08 2023 17:31:53 %S A061069 1,2,3,4,5,6,7,8,9,10,10,11,12,13,13,14,14,15,16,17,18,19,19,20,20,20, %T A061069 21,22,23,24,24,25,26,27,27,28,29,29,29,30,30,31,32,33,34,34,34,35,36, %U A061069 37,37,38,38,39,39,39,40,40,40,41,42,42,43,44,44,45,46,47,47,47,47,48 %N A061069 Number of distinct values in the list of divisor-sums {sigma(j) : j=1...n}. %H A061069 T. D. Noe, <a href="/A061069/b061069.txt">Table of n, a(n) for n=1..1000</a> %F A061069 a(n)=Length[Union[Table[DivisorSigma[1, w], {w, 1, n}]]] %o A061069 (Python) %o A061069 from sympy import divisor_sigma %o A061069 def A061069(n): return len({divisor_sigma(i) for i in range(1,n+1)}) # _Chai Wah Wu_, Sep 08 2023 %Y A061069 Cf. A000203. %K A061069 nonn %O A061069 1,2 %A A061069 _Labos Elemer_, May 28 2001