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 A343982 #14 May 08 2021 01:53:47
%S A343982 1,6,54,135,486,495,516,1134,1863,2295,3375,4374,4875,5535,10935,
%T A343982 11875,15435,19695,22295,23625,24057,34853,39015,39366,42875,43875,
%U A343982 59265,64881,77625,84375,89667,100875,102375,114582,122625,142155,144495,161325,165375,205979,251505,268569
%N A343982 Numbers k that divide Sum_{j|k} j^(k/j).
%H A343982 Seiichi Manyama, <a href="/A343982/b343982.txt">Table of n, a(n) for n = 1..200</a>
%e A343982 1^6 + 2^3 + 3^2 + 6^1 = 24 = 4 * 6. So 6 is a term.
%t A343982 q[n_] := Divisible[DivisorSum[n, #^(n/#) &], n]; Select[Range[10^5], q] (* _Amiram Eldar_, May 06 2021 *)
%o A343982 (PARI) isok(n) = sumdiv(n, d, Mod(d, n)^(n/d))==0;
%Y A343982 Cf. A007691, A055225, A067313, A336892.
%K A343982 nonn
%O A343982 1,2
%A A343982 _Seiichi Manyama_, May 06 2021