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 A171762 #8 Jan 13 2019 03:11:01
%S A171762 4,12,22,34,44,58,72,88,100,120,126,148,164,182,196,220,228,254,264,
%T A171762 284,304,328,338,358,382,400,420,444,442,478,494,518,544,564,562,602,
%U A171762 622,648,652,690,684,730,740,768,790,812,828,858,870,898,920,946,958,990
%N A171762 a(n) = Sum_{k=n^2+1..(n+1)^2-1} tau(k).
%F A171762 a(n) = A168011(n) - A168011(n-1) - A048691(n). - _R. J. Mathar_, Jan 25 2010
%p A171762 A168011 := proc(n) add( numtheory[tau](k),k=1..n^2+2*n) ; end proc: A048691 := proc(n) numtheory[tau](n^2) ; end proc: A171762 := proc(n) A168011(n)-A168011(n-1)-A048691(n) ; end proc: seq(A171762(n),n=1..80) ; # _R. J. Mathar_, Jan 25 2010
%t A171762 Array[n \[Function] Sum[DivisorSigma[0, k], {k, n^2 + 1, (n + 1)^2 - 1}], 200] (* J. Mulder (jasper.mulder(AT)planet.nl), Jan 28 2010 *)
%Y A171762 Cf. A000005, A048691, A168011.
%K A171762 nonn,easy
%O A171762 1,1
%A A171762 _Giovanni Teofilatto_, Dec 18 2009
%E A171762 Definition corrected by _Giovanni Teofilatto_, Dec 19 2009
%E A171762 More terms from _R. J. Mathar_ and J. Mulder (jasper.mulder(AT)planet.nl), Jan 25 2010