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 A369749 #6 Jun 26 2024 21:53:28 %S A369749 0,4,6,6,10,19,14,14,15,37,22,47,26,55,58,38,34,85,38,93,86,95,46,131, %T A369749 55,121,69,135,58,246,62,106,148,169,162,233,74,191,188,237,82,366,86, %U A369749 235,256,235,94,337,119,339,262,293,106,389,276,347,296,305,118,624 %N A369749 a(n) = Sum_{p|n, p prime} p * prime(n/p). %F A369749 a(p^k) = p * prime(p^(k-1)), for p prime and k >= 1. - _Wesley Ivan Hurt_, Jun 26 2024 %t A369749 Table[DivisorSum[n, #*Prime[n/#] &, PrimeQ[#] &], {n, 100}] %Y A369749 Cf. A000040, A351368, A369748. %K A369749 nonn,easy %O A369749 1,2 %A A369749 _Wesley Ivan Hurt_, Jan 30 2024