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 A088010 #18 Nov 10 2017 16:34:16
%S A088010 1,315,1155,8415,8925,31815,32445,33705,34335,78975,351351,430815,
%T A088010 437745,442365,449295,730125,1805475,7667625,13800465,14571585,
%U A088010 16029405,16286445,20297745,20355825,20487159,21003885,22982505,23082885
%N A088010 Odd numbers n such that abs(sigma(n)-2n) <= n^(1/3). Abundance-radius = abs(sigma(n)-2n) does not exceed cubic root of n and n is odd.
%H A088010 Donovan Johnson, <a href="/A088010/b088010.txt">Table of n, a(n) for n = 1..100</a>
%t A088010 abu[x_] := Abs[DivisorSigma[1, x]-2*x] Do[If[ !Greater[abu[n], n^(1/3)//N]&&OddQ[n], Print[n]], {n, 1, 100000}]
%o A088010 (PARI) isok(n) = (n % 2) && (abs(sigma(n)-2*n) < sqrtn(n, 3)); \\ _Michel Marcus_, Nov 10 2017
%Y A088010 Cf. A077374, A088007-A088012, A000396, A000079, A005100, A005101.
%K A088010 nonn
%O A088010 1,2
%A A088010 _Labos Elemer_, Oct 20 2003
%E A088010 a(17)-a(28) from _Donovan Johnson_, Feb 01 2009