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 A348606 #10 Oct 26 2021 04:27:30
%S A348606 21735,76544,170624,301664,345344,348704,382304,739935,862784,1218944,
%T A348606 1262624,1272704,1314495,1370655,1376864,1539615,1558304,1707615,
%U A348606 1718144,1761375,1845375,1890944,1926015,2100735,2132864,2223584,2415104,2463615,2581215,2675295,2747744
%N A348606 Numbers k such that k and k+1 are both nonexponential abundant numbers.
%H A348606 Amiram Eldar, <a href="/A348606/b348606.txt">Table of n, a(n) for n = 1..10000</a>
%e A348606 21735 is a term since A160135(21735) = 21930 > 21735 and A160135(21736) = 23230 > 21736.
%t A348606 esigma[n_] := Times @@ (Sum[First[#]^d, {d, Divisors[Last[#]]}] &) /@ FactorInteger[n]; q[n_] := DivisorSigma[1, n] - esigma[n] > n; Select[Range[1, 3*10^6], q[#] && q[#+1] &]
%Y A348606 Cf. A160135.
%Y A348606 Subsequence of A096399 and A348604.
%Y A348606 Similar sequences: A318167, A327635, A327942, A331412, A348276.
%K A348606 nonn
%O A348606 1,1
%A A348606 _Amiram Eldar_, Oct 25 2021