Position of the center of a 4-lion in the octant x >= y >= 0.
2, 2, 3, 1, 5, 5, 25, 5, 25, 25, 30, 30, 45, 15, 35, 35, 70, 70, 85, 85, 120, 30, 125, 5, 130, 50, 100, 100, 110, 110, 175, 65, 260, 20, 310, 10, 225, 225, 240, 210, 230, 230, 310, 110, 335, 5, 250, 230, 260, 260, 305, 215, 310, 220, 285, 285, 290, 290, 340, 250
1
See S000417. The terms on the diagonal x=y have coordinates x given in A109306.
T. D. Noe, Plot of 1689 pairs
T. D. Noe, Table of 1689 pairs
(Mma) nn = 1000; t = {}; Do[z = x + I*y; If[PrimeQ[z - 1, GaussianIntegers -> True] && PrimeQ[z + 1, GaussianIntegers -> True] && PrimeQ[z - I, GaussianIntegers -> True] && PrimeQ[z + I, GaussianIntegers -> True], If[Abs[z] <= nn, t = AppendTo[t, {Abs[z]^2, {x, y}}]]], {x, 0, nn}, {y, x}]; t = Sort[t]; Transpose[t][[2]]
nonn
T. D. Noe, Dec 18 2014