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 A345304 #8 Mar 23 2023 07:36:32 %S A345304 0,4,9,4,25,30,49,8,9,70,121,48,169,126,120,16,289,54,361,120,210,286, %T A345304 529,96,25,390,27,224,841,300,961,32,462,646,420,72,1369,798,624,240, %U A345304 1681,504,1849,528,270,1150,2209,192,49,150,1020,728,2809,162,880,448,1254,1798,3481 %N A345304 a(n) = Sum_{p|n, p prime} p * lcm(p,n/p). %C A345304 If p is prime, a(p) = Sum_{p|p} p * lcm(p,p/p) = p * p = p^2. %H A345304 <a href="/index/Lc#lcm">Index entries for sequences related to lcm's</a> %e A345304 a(18) = Sum_{p|18} p * lcm(p,18/p) = 2*lcm(2,9) + 3*lcm(3,6) = 2*18 + 3*6 = 54. %t A345304 Table[Sum[k*LCM[k, n/k] (PrimePi[k] - PrimePi[k - 1]) (1 - Ceiling[n/k] + Floor[n/k]), {k, n}], {n, 100}] %Y A345304 Cf. A008472, A345266, A345302. %K A345304 nonn %O A345304 1,2 %A A345304 _Wesley Ivan Hurt_, Jun 13 2021