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 A307052 #10 Mar 25 2019 04:39:22
%S A307052 5,17,80,257,1280,4352,8060,65537,327680,1065220,1089452,1114112,
%T A307052 16842752,100340800,383479200,466344000000
%N A307052 Larger of amicable numbers pair m < n such that A307037(m) = n and A307037(n) = m.
%C A307052 The terms are ordered according to their lesser counterparts (A307051).
%C A307052 a(17) > 4*10^12. - _Giovanni Resta_, Mar 24 2019
%t A307052 f[p_, e_] := p^e + (-1)^e; a[1] = 1; a[n_] := Times @@ f @@@ FactorInteger[n]; s={}; Do[m = a[n]; If[m > n && a[m] == n, AppendTo[s, m]], {n, 1, 10^7}]; s
%Y A307052 Cf. A307037, A307038, A307051.
%K A307052 nonn,more
%O A307052 1,1
%A A307052 _Amiram Eldar_, Mar 21 2019
%E A307052 a(16) from _Giovanni Resta_, Mar 24 2019