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 A152911 #7 Mar 15 2015 20:42:03
%S A152911 0,1,3,4,5,11,16,17,29,35,47,67,97,112,129,133,145,161,225,245,297,
%T A152911 349,351,369,485,514,551,637,787,901,1009,1033,1117,1237,1333,1669,
%U A152911 2009,2061,2187,2489,2615,3073,3439,3449,4233,4537,4809,5241,5269,5377,6793
%N A152911 Records in A152770.
%H A152911 Robert G. Wilson v, <a href="/A152911/b152911.txt">Table of n, a(n) for n = 1..863</a>
%t A152911 f[n_] := DivisorSigma[1, n] - DivisorSigma[0, n] - n + 1; t = Array[f, 10000]; lst = {}; a = -1; Do[ If[ t[[n]] > a, a = t[[n]]; AppendTo[lst, a]], {n, 10000}]; lst (* _Robert G. Wilson v_, Dec 21 2008 *)
%Y A152911 Cf. A152770.
%K A152911 easy,nonn
%O A152911 1,3
%A A152911 _Omar E. Pol_, Dec 15 2008
%E A152911 Extended by _Robert G. Wilson v_, Dec 21 2008