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 A056897 #7 May 07 2016 09:01:30
%S A056897 1,0,0,1,0,1,0,9,4,1,0,1,0,9,4,1,0,1,0,9,16,1,0,49,4,81,4,1,0,1,0,9,4,
%T A056897 9,36,1,0,9,4,1,0,1,0,9,16,1,0,25,4,9,16,1,0,25,4,81,4,1,0,1,0,9,4,9,
%U A056897 36,1,0,81,4,1,0,1,0,9,4,25,36,1,0,9,16,1,0,25,4,81,16,1,0,49,16,9,4,9
%N A056897 Smallest square where a(n)+n is prime.
%H A056897 Harvey P. Dale, <a href="/A056897/b056897.txt">Table of n, a(n) for n = 0..1000</a>
%F A056897 a(n) =A056896(n)-n =A056898(n)^2
%e A056897 a(8)=9 since 9 is a square and 9+8=7 which is a prime
%t A056897 With[{sqs=Range[0,20]^2},Table[SelectFirst[sqs,PrimeQ[n+#]&],{n,100}]] (* The program uses the SelectFirst function from Mathematica version 10 *) (* _Harvey P. Dale_, May 07 2016 *)
%Y A056897 Cf. A000040, A002496, A056892-A056898.
%K A056897 nonn
%O A056897 0,8
%A A056897 _Henry Bottomley_, Jul 05 2000