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 A154711 #4 Nov 20 2018 18:53:49 %S A154711 36,144,1296,5184,6084,28224,39204,41616,116964,186624,207936,242064, %T A154711 285156,345744,352836,443556,527076,571536,617796,646416,992016, %U A154711 1028196,1468944,1483524,1557504,1572516,1602756,1726596,1806336,2178576 %N A154711 Squares such that square-+5 are primes. %t A154711 lst={};Do[p=n^2;If[PrimeQ[p-5]&&PrimeQ[p+5],AppendTo[lst,p]],{n,6,8!,6}];lst %t A154711 Select[Range[1500]^2,AllTrue[#+{5,-5},PrimeQ]&] (* The program uses the AllTrue function from Mathematica version 10 *) (* _Harvey P. Dale_, Nov 20 2018 *) %Y A154711 Cf. A144938, A154709, A154710 %K A154711 nonn %O A154711 1,1 %A A154711 _Vladimir Joseph Stephan Orlovsky_, Jan 14 2009