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 A369894 #10 Jan 22 2025 15:46:59 %S A369894 0,1,1,4,1,10,1,12,6,14,1,36,1,18,16,32,1,51,1,52,20,26,1,104,10,30, %T A369894 27,68,1,124,1,80,28,38,24,180,1,42,32,152,1,164,1,100,87,50,1,272,14, %U A369894 115,40,116,1,216,32,200,44,62,1,432,1,66,111,192,36,244,1,148 %N A369894 a(n) = n * Sum_{p|n, p prime} tau(n/p) / p. %H A369894 Antti Karttunen, <a href="/A369894/b369894.txt">Table of n, a(n) for n = 1..20000</a> %F A369894 a(p^k) = k*p^(k-1), for prime p and k >= 1. - _Wesley Ivan Hurt_, Jun 26 2024 %t A369894 Table[n*DivisorSum[n, DivisorSigma[0, n/#]/# &, PrimeQ[#] &], {n, 80}] %o A369894 (PARI) A369894(n) = if(1==n, 0, my(f=factor(n)); n*sum(i=1, #f~, (numdiv(n/f[i, 1])/f[i,1]))); \\ _Antti Karttunen_, Jan 22 2025 %Y A369894 Cf. A000005 (tau), A062799, A319131, A369893. %K A369894 nonn,easy %O A369894 1,4 %A A369894 _Wesley Ivan Hurt_, Feb 04 2024