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 A098219 #16 Oct 07 2019 14:09:48
%S A098219 1,2,2,2,2,4,2,3,1,3,2,4,1,4,4,2,2,3,2,4,3,4,2,7,1,3,3,4,2,6,2,3,3,3,
%T A098219 3,3,1,4,3,5,2,6,1,5,3,4,2,4,1,2,3,3,2,6,3,6,3,4,2,8,1,4,3,2,3,6,1,4,
%U A098219 3,5,2,4,1,3,2,4,3,6,2,4,1,3,2,6,3,3,4,6,2,6,2,5,2,4,3,7,1,2,3,2,2,5,2,5,4
%N A098219 a(n) = floor(sigma(sigma(n))/n) = floor(A051027(n)/n).
%H A098219 Indranil Ghosh, <a href="/A098219/b098219.txt">Table of n, a(n) for n = 1..25000</a>
%e A098219 For n=10, a(10) = floor(sigma(sigma(10))/10) = floor(sigma(18)/10) = floor(39/10) = 3.
%t A098219 Table[Floor[Nest[DivisorSigma[1, #] &, n, 2]/n], {n, 120}] (* _Michael De Vlieger_, Mar 02 2017 *)
%o A098219 (PARI) a(n) = sigma(sigma(n))\n; \\ _Michel Marcus_, Oct 07 2019
%Y A098219 Cf. A000203, A051027, A008333, A098220, A098221, A098222.
%K A098219 nonn
%O A098219 1,2
%A A098219 _Labos Elemer_, Oct 25 2004