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 A348601 #6 Oct 25 2021 11:11:28
%S A348601 1,6,40,234,588,89376,10805558400
%N A348601 Nonexponential multiply-perfect numbers: numbers k such that k | A160135(k).
%C A348601 The corresponding quotients A160135(k)/k are 1, 1, 1, 1, 1, 2, 3, ...
%C A348601 a(8) > 1.5*10^10, if it exists.
%e A348601 6 is a term since its nonexponential divisors are 1, 2 and 3, so A160135(6) = 1 + 2 + 3 = 6 which is divisible by 6.
%e A348601 40 is a term since its nonexponential divisors are 1, 2, 4, 5, 8 and 20, so A160135(40) = 1 + 2 + 4 + 5 + 8 + 20 = 40 which is divisible by 40.
%t A348601 esigma[n_] := Times @@ (Sum[First[#]^d, {d, Divisors[Last[#]]}] &) /@ FactorInteger[n]; Select[Range[1000], Divisible[DivisorSigma[1, #] - esigma[#], #] &]
%Y A348601 Cf. A160135.
%Y A348601 Similar sequences: A007691, A064594, A064595, A189000, A327158.
%K A348601 nonn,more
%O A348601 1,2
%A A348601 _Amiram Eldar_, Oct 25 2021