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 A370355 #6 Feb 16 2024 15:21:16
%S A370355 1681,5251,7771,36961,39271,170941,196351,360361,510511,1009471,
%T A370355 9699691
%N A370355 Highly touchable numbers sandwiched between untouchable twin pairs.
%C A370355 Highly touchable numbers k have a record number of solutions x to A001065(x) = k, while untouchable numbers k have no solution to this equation.
%t A370355 seq[nmax_] := Module[{v = Table[0, {nmax}], i, s = {}, vmax = -1}, Do[i = DivisorSigma[1, n] - n; If[0 < i <= nmax, v[[i]]++], {n, 1, nmax^2}]; Do[If[v[[n]] > vmax, vmax = v[[n]]; If[v[[n - 1]] == 0 && v[[n + 1]] == 0, AppendTo[s, n]]], {n, 2, nmax - 1}]; s]; seq[8000]
%Y A370355 Intersection of A238895 and {A231964(n) + 1};
%Y A370355 Cf. A001065, A005114.
%Y A370355 Similar sequences: A068507, A113839.
%K A370355 nonn,hard,more
%O A370355 1,1
%A A370355 _Amiram Eldar_, Feb 16 2024