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 A347142 #7 Aug 20 2021 00:21:53
%S A347142 0,1,1,1,1,17,1,17,1,17,1,98,1,17,82,17,1,98,1,273,82,17,1,354,1,17,
%T A347142 82,273,1,723,1,273,82,17,626,354,1,17,82,898,1,1394,1,273,707,17,1,
%U A347142 1650,1,642,82,273,1,1394,626,2674,82,17,1,2275,1,17,2483,273,626
%N A347142 Sum of 4th powers of divisors of n that are < sqrt(n).
%F A347142 G.f.: Sum_{k>=1} k^4 * x^(k*(k + 1)) / (1 - x^k).
%t A347142 Table[DivisorSum[n, #^4 &, # < Sqrt[n] &], {n, 1, 65}]
%t A347142 nmax = 65; CoefficientList[Series[Sum[k^4 x^(k (k + 1))/(1 - x^k), {k, 1, nmax}], {x, 0, nmax}], x] // Rest
%o A347142 (PARI) A347142(n) = { my(s=0); fordiv(n,d,if((d^2)>=n,return(s)); s += (d^4)); }; \\ _Antti Karttunen_, Aug 19 2021
%Y A347142 Cf. A001159, A056924, A070039, A279363, A339353, A339354, A347143.
%K A347142 nonn
%O A347142 1,6
%A A347142 _Ilya Gutkovskiy_, Aug 19 2021