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.

A141228 Number of points having maximal visibility in a cubic n x n x n lattice.

This page as a plain text file.
%I A141228 #2 Mar 30 2012 17:22:50
%S A141228 1,8,1,8,20,64,20,32,64,216,13,432,64,64,20,32,8,32,32,216,64,64,27,8,
%T A141228 64,216,7,32,64,352,32,216,8,8,125,64,8,24,1,8,64,8,32,24,8,8,27,8,8,8
%N A141228 Number of points having maximal visibility in a cubic n x n x n lattice.
%C A141228 Sequence A141227 gives the maximum number of points visible from some point. By symmetry, when a(n) is odd, the central point in the lattice can see the maximal number of points. When a(n)=1, the central point is the only such point. Apparently the numbers n in A141226 produce both the n x n and n x n x n lattices having central points with maximum visibility.
%t A141228 Table[mx=0; pts=0; Do[cnt=0; Do[If[GCD[d-a,e-b,f-c]<2, cnt++ ], {a,n}, {b,n}, {c,n}]; If[cnt>mx, mx=cnt; pts=1, If[cnt==mx, pts++ ]], {d,n}, {e,n}, {f,n}]; pts, {n,10}]
%Y A141228 Cf. A141225.
%K A141228 nonn
%O A141228 1,2
%A A141228 _T. D. Noe_, Jun 15 2008