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 A369741 #10 Jan 23 2025 17:42:38
%S A369741 0,1,1,2,1,5,1,4,3,7,1,13,1,9,8,8,1,13,1,29,10,13,1,35,5,15,9,53,1,38,
%T A369741 1,16,14,19,12,35,1,21,16,133,1,62,1,125,34,25,1,97,7,29,20,173,1,35,
%U A369741 16,351,22,31,1,160,1,33,58,32,18,134,1,293,26,78,1,97,1,39
%N A369741 a(n) = Sum_{p|n, p prime} p^Omega(n/p).
%H A369741 Antti Karttunen, <a href="/A369741/b369741.txt">Table of n, a(n) for n = 1..20000</a>
%F A369741 a(p^k) = p^(k-1), for p prime and k >= 1. - _Wesley Ivan Hurt_, Jun 26 2024
%t A369741 Table[DivisorSum[n, #^PrimeOmega[n/#] &, PrimeQ[#] &], {n, 100}]
%o A369741 (PARI) A369741(n) = if(1==n, 0, my(f=factor(n)); sum(i=1, #f~, f[i,1]^bigomega(n/f[i, 1]))); \\ _Antti Karttunen_, Jan 23 2025
%Y A369741 Cf. A001222 (Omega), A307409, A369909.
%Y A369741 Cf. also A345301.
%K A369741 nonn,easy
%O A369741 1,4
%A A369741 _Wesley Ivan Hurt_, Jan 30 2024