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 A324295 #41 Sep 05 2019 05:13:24 %S A324295 2,3,4,186,318,434,473,582,730,978,1024,1035,1245,1357,1397,1506,1661, %T A324295 1902,2085,2116,2224,2329,2453,2505,2506,2770,2954,3144,3345,3377, %U A324295 3624,3641,3765,3790,3882,4037,4172,4438,4898,4938,4975,5221,6126,6285,6312,6356 %N A324295 Numbers k such that s(k) = s(k+1) where s(k) is the sum of divisors of k that are smaller than sqrt(k) (A070039). %H A324295 Amiram Eldar, <a href="/A324295/b324295.txt">Table of n, a(n) for n = 1..10000</a> %e A324295 186 is in the sequence since A070039(186) = A070039(187) = 12. %t A324295 s[n_] := DivisorSum[n, # &, # < Sqrt[n] &]; seq={}; s1 = 0; Do[s2 = s[n]; If[s1 == s2, AppendTo[seq, n - 1]]; s1 = s2, {n, 2, 6500}]; seq %Y A324295 Cf. A002961, A064115, A064125, A070039, A164522, A164557, A293183, A306985, A325175. %K A324295 nonn %O A324295 1,1 %A A324295 _Amiram Eldar_, Sep 03 2019