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 A073658 #8 Dec 15 2017 17:35:58 %S A073658 1,4,9,64,25,16,81,100,49,144,169,400,121,36,361,196,225,484,289,324, %T A073658 529,900,841,256,625,576,1225,676,441,1156,1521,1600,1089,784,1369, %U A073658 1024,729,2500,961,1936,1681,2116,2401,1296,4225,1444,2025,2704,3249,4624 %N A073658 Rearrangement of squares such that sum of two consecutive terms is a prime. %H A073658 T. D. Noe, <a href="/A073658/b073658.txt">Table of n, a(n) for n = 1..1000</a> %t A073658 mx = 100; free = Range[2, mx]^2; t = {1}; While[i = 1; While[i <= Length[free] && ! PrimeQ[t[[-1]] + free[[i]]], i++]; i <= Length[free], AppendTo[t, free[[i]]]; free = Delete[free, i]]; t (* _T. D. Noe_, Dec 18 2012 *) %Y A073658 Cf. A073655, A073656, A073657. %K A073658 nonn %O A073658 1,2 %A A073658 _Amarnath Murthy_, Aug 10 2002 %E A073658 More terms from _Jason Earls_, Aug 25 2002