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 A344732 #7 May 28 2021 00:55:43 %S A344732 1,2,3,54,58,62,71,10535,10541,10579,135242,135243,1733777,1733781, %T A344732 1733895,1733905,1733999,22216757,22216765,22216790,22216808,22216814, %U A344732 46745561148,46745561156 %N A344732 Numbers k such that k divides Sum_{j=1..k} A048105(j). %C A344732 The corresponding quotients Sum_{j=1..k} A048105(j)/k are 0, 0, 0, 1, 1, 1, 1, 3, 3, 3, 4, 4, 5, 5, 5, 5, 5, 6, 6, 6, 6, 6, 9, 9, ... %C A344732 a(25) > 7.5*10^10, if it exists. %e A344732 a(1) = 1 since A048105(1) = 0 is divisible by 1. %e A344732 a(4) = 54 since Sum_{j=1..54} A048105(j) = 54 is divisible by 54. %t A344732 s[1] = 0; s[n_] := s[n] = s[n - 1] + DivisorSigma[0, n] - 2^PrimeNu[n]; Select[Range[140000], Divisible[s[#], #] &] %Y A344732 Cf. A048105. %Y A344732 The non-unitary version of A050226. %Y A344732 Similar sequences: A064610, A344731, A344733. %K A344732 nonn,more %O A344732 1,2 %A A344732 _Amiram Eldar_, May 27 2021