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 A046522 #16 Mar 08 2020 00:20:15
%S A046522 1,0,0,1,2,0,2,0,3,2,4,0,4,2,2,3,6,2,6,2,4,4,6,0,7,6,6,4,8,2,8,4,6,6,
%T A046522 6,3,10,8,8,4,10,4,10,6,6,8,10,2,11,8,10,8,12,6,10,6,10,10,12,2,12,10,
%U A046522 8,9,12,8,14,10,12,8,14,4,14,12,10,10,12,8,14,6
%N A046522 a(n) = 2*floor(sqrt(n)) - d(n), where d(n) is the number of divisors of n (A000005).
%C A046522 Always >= 0.
%D A046522 D. S. Mitrinovic et al., Handbook of Number Theory, Kluwer, Section II.1.1.
%H A046522 Nathaniel Johnston, <a href="/A046522/b046522.txt">Table of n, a(n) for n = 1..10000</a>
%p A046522 with(numtheory); f := n->2*floor(sqrt(n))-sigma[ 0 ](n);
%t A046522 Table[2Floor[Sqrt[n]]-DivisorSigma[0,n],{n,80}] (* _Harvey P. Dale_, Nov 27 2013 *)
%o A046522 (PARI) a(n)={2*sqrtint(n)-numdiv(n)} \\ _Andrew Howroyd_, Mar 07 2020
%K A046522 nonn,easy
%O A046522 1,5
%A A046522 _N. J. A. Sloane_