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 A141224 #10 Feb 16 2025 08:33:08 %S A141224 1,4,9,13,19,25,35,43,55,65,81,91,111,125,147,163,187,203,233,251,283, %T A141224 305,337,359,399,422,465,491,531,553,609,636,691,721,769,799,863,896, %U A141224 961,993,1051,1085,1159,1199,1267,1313,1377,1416,1501,1547,1627,1679 %N A141224 Maximum number of points visible from some point in a square n X n lattice. %C A141224 Two points (a,b) and (c,d) are visible to each other when gcd(c-a,d-b)=1. Sequence A141225 gives the number of lattice points that have maximal visibility. %H A141224 T. D. Noe, <a href="/A141224/b141224.txt">Table of n, a(n) for n=1..1000</a> %H A141224 Eric Weisstein, <a href="https://mathworld.wolfram.com/VisiblePoint.html">MathWorld: Visible Point</a> %F A141224 The maximum number of visible points is slightly more than c*n^2, with c = 6/Pi^2. %t A141224 Table[mx=0; Do[cnt=0; Do[If[GCD[c-a,d-b]<2, cnt++ ], {a,n}, {b,n}]; If[cnt>mx, mx=cnt], {c,n}, {d,n}]; mx, {n,20}] %K A141224 nice,nonn %O A141224 1,2 %A A141224 _T. D. Noe_, Jun 15 2008