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 A297842 #18 Jan 13 2025 01:32:11
%S A297842 1,16,54,136,250,486,686,1152,1485,2250,2662,4016,4394,6174,7000,9280,
%T A297842 9826,13554,13718,18250,19208,23958,24334,32560,31375,39546,40824,
%U A297842 50078,48778,63182,59582,74752,74536,88434,86436,110106,101306,123462,123032,147024
%N A297842 a(n) = Sum_{d|n} max(d, n/d)^3.
%H A297842 Seiichi Manyama, <a href="/A297842/b297842.txt">Table of n, a(n) for n = 1..10000</a>
%F A297842 a(n) + A297793(n) = 2*A001158(n).
%F A297842 Sum_{k=1..n} a(k) ~ (zeta(4)/2) * n^4. - _Amiram Eldar_, Jan 12 2025
%t A297842 f[n_] := Block[{d = Divisors@ n}, Plus @@ (Max[#, n/#]^3 & /@ d)]; Array[f, 40] (* _Robert G. Wilson v_, Jan 07 2018 *)
%o A297842 (PARI) {a(n) = sumdiv(n, d, max(d, n/d)^3)}
%Y A297842 Sum_{d|n} max(d, n/d)^k: A117003 (k=1), A297841 (k=2), this sequence (k=3), A297843 (k=4), A297844 (k=5).
%Y A297842 Cf. A001158, A013662, A297793.
%K A297842 nonn
%O A297842 1,2
%A A297842 _Seiichi Manyama_, Jan 07 2018