cp's OEIS Frontend

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.

A178793 These are the y coordinates of isolated visible lattice points in the plane.

This page as a plain text file.
%I A178793 #25 Jul 12 2025 08:36:43
%S A178793 55,175,551,575,589,609,679,741,741,791,799,805,875,945,987,987,995,
%T A178793 1035,1065,1105,1105,1159,1209,1275,1309,1309,1309,1407,1421,1463,
%U A178793 1463,1463,1495,1495,1551,1581,1581,1611,1625,1639,1651,1665,1665,1665,1695
%N A178793 These are the y coordinates of isolated visible lattice points in the plane.
%C A178793 From _Gregg Whisler_, Jun 21 2010: (Start)
%C A178793 a(n) is also A157428 + 1. [_Charles R Greathouse IV_ points out that this is false, since (1308, 1274) is in (A157428, A157429) but not in (A178793, A178794). Oct 17 2012]
%C A178793 An isolated lattice point is surrounded (in a Moore neighborhood of r=1) in the Z^2 lattice of points by 8 points that are not visible from the origin. (End)
%H A178793 Eric W. Weisstein, <a href="https://mathworld.wolfram.com/VisiblePoint.html">Visible Point</a>
%t A178793 Table[Replace[Select[First/@Position[Partition[CoprimeQ[n,Range[n]],3,1],{False,True,False},{1}]+1, Outer[CoprimeQ, n+ {-1,1},#1+{-1,0,1}]=={{False,False,False},{False,False,False}}&],{{}-> Sequence[], list_:>Sequence@@ ({#1,n}&)/@list}],{n,2000}][[All, 2]] (* _Eric Rowland_ *)
%Y A178793 Cf. A157428, A157429, A178794 (corresponding x coordinates), A216467.
%K A178793 nonn
%O A178793 1,1
%A A178793 _Gregg Whisler_, Jun 15 2010
%E A178793 More terms (until the corresponding first x coordinate (21) repeats) from _Gregg Whisler_, Jun 21 2010