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 A088513 #21 Aug 10 2017 04:39:04
%S A088513 7,13,19,31,37,43,49,61,67,73,79,91,91,97,103,109,127,133,133,139,157,
%T A088513 151,169,163,193,181,199,211,217,217,223,241,229,247,247,259,259,277,
%U A088513 301,307,283,331,301,313,343,337,349,367,397,361,373,379,403,421,403
%N A088513 Smallest cevians corresponding to A089025(n).
%t A088513 findPrimIntEquiCevian[maxC_] :=
%t A088513 Reap[Do[Do[
%t A088513 With[{cevian = Abs[c E^((2 \[Pi] I)/6) - a]},
%t A088513 If[FractionalPart[cevian] == 0 && GCD[a, c] == 1,
%t A088513 Sow[cevian]; Break[]]], {a, Floor[c/2],
%t A088513 1, -1}], {c, maxC}]][[2, 1]]
%t A088513 (* _Andrew Turner_, Aug 04 2017 *)
%Y A088513 Cf. A089025.
%K A088513 nonn
%O A088513 1,1
%A A088513 _Lekraj Beedassy_, Nov 14 2003