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 A333644 #8 Nov 18 2023 21:03:53 %S A333644 2,7,14,26,39,62,81,112,142,187,220,287,330,395,460,544,605,712,781, %T A333644 904,1001,1116,1201,1376,1486,1633,1766,1945,2056,2279,2408,2623,2798, %U A333644 3001,3180,3482,3641,3876,4091,4406,4587,4924,5117,5432,5717,6004,6217,6668,6914,7285 %N A333644 a(n) = Sum_{k=1..n} floor(n/k) * prime(k). %C A333644 Partial sums of A007445. %F A333644 G.f.: (1/(1 - x)) * Sum_{k>=1} prime(k) * x^k / (1 - x^k). %t A333644 Table[Sum[Floor[n/k] Prime[k], {k, n}], {n, 50}] %o A333644 (PARI) a(n) = sum(k=1, n, (n\k)*prime(k)); \\ _Michel Marcus_, Mar 31 2020 %Y A333644 Cf. A000040, A007445, A024916, A333471. %K A333644 nonn %O A333644 1,1 %A A333644 _Ilya Gutkovskiy_, Mar 31 2020