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 A379769 #21 Jan 07 2025 10:07:09 %S A379769 0,1,2,0,0,2,2,4,5,7,7,11,11,13,0,2,1,4,3,6,7,8,7,12,12,13,14,17,16, %T A379769 21,20,23,24,25,26,32,31,32,33,38,37,0,41,0,2,2,0,6,5,7,7,9,7,11,11, %U A379769 15,15,15,13,21,19,19,21,24,24,28,26,28,28,32,30,38,36,36,38,40,40,44 %N A379769 a(n) = (A006218(n) mod n). %F A379769 a(A050226(k)) = 0. %e A379769 n = 7: a(7) = A006218(7) mod 7 = 2. %t A379769 With[{nmax = 100}, Mod[Accumulate[DivisorSigma[0, Range[nmax]]], Range[nmax]]] (* _Amiram Eldar_, Jan 06 2025 *) %o A379769 (PARI) a(n) = sum(k=1, n, numdiv(k)) % n; \\ _Michel Marcus_, Jan 06 2025 %Y A379769 Cf. A006218, A050226. %K A379769 nonn,look %O A379769 1,3 %A A379769 _Ctibor O. Zizka_, Jan 06 2025