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 A224488 #16 Jul 13 2021 06:25:02
%S A224488 4,10,42,90,2448,4680,27144,117000,154498509,222970077,11049088050,
%T A224488 63554826816
%N A224488 Numbers m such that k*m = Sum_{j|m, j < m} sigma(j), where k >= 1 is an integer.
%C A224488 a(13) > 10^11.
%e A224488 The divisors of 10 smaller than 10 are 1, 2 and 5. Since sigma(1) + sigma(2) + sigma(5) = 10, 10 is in the sequence.
%t A224488 Select[Range[2, 120000], Mod[Total@DivisorSigma[1, Most@Divisors@#], #] == 0 &]
%o A224488 (PARI) isok(m) = sumdiv(m, d, if (d!=m, sigma(d))) % m == 0; \\ _Michel Marcus_, Jul 13 2021
%Y A224488 Cf. A211779, A221219.
%K A224488 nonn,more
%O A224488 1,1
%A A224488 _Giovanni Resta_, Apr 08 2013
%E A224488 a(9)-a(12) and bound on a(13) from _Donovan Johnson_.