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 A154712 #4 Nov 20 2018 18:55:44
%S A154712 1,2,6,12,13,28,33,34,57,72,76,82,89,98,99,111,121,126,131,134,166,
%T A154712 169,202,203,208,209,211,219,224,246,252,259,301,302,317,348,383,387,
%U A154712 394,436,439,511,512,527,572,574,642,666,667,677,726,763,769,779,792,818
%N A154712 (6*n)^2 = A154711.
%C A154712 A154711 Squares such that square-+5 are primes.
%t A154712 lst={};Do[p=n^2;If[PrimeQ[p-5]&&PrimeQ[p+5],AppendTo[lst,(p^(1/2))/6]],{n,6,8!,6}];lst
%t A154712 Sqrt[#]/6&/@Select[Range[5000]^2,AllTrue[#+{5,-5},PrimeQ]&] (* The program uses the AllTrue function from Mathematica version 10 *) (* _Harvey P. Dale_, Nov 20 2018 *)
%Y A154712 Cf. A144938, A154709, A154710, A154711
%K A154712 nonn
%O A154712 1,2
%A A154712 _Vladimir Joseph Stephan Orlovsky_, Jan 14 2009