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 A029945 #12 May 09 2017 18:26:15 %S A029945 25,36,25,576,1156,1369,1764,196,2304,529,3136,3721,441,4356,4761, %T A029945 5329,5929,361,676,17161,7396,7921,8836,289,30976,101124,103041,51076, %U A029945 109561,113569,12769,21316,137641,13924,114921,15129,157609 %N A029945 Smallest square containing n-th prime as substring. %H A029945 John Cerkan, <a href="/A029945/b029945.txt">Table of n, a(n) for n = 1..10000</a> %t A029945 With[{e = 2}, Table[Function[p, k = 1; While[Length@ SequencePosition[ IntegerDigits[Set[c, k^e]], p] == 0, k++]; c]@ IntegerDigits@ Prime@ n, {n, 37}]] (* _Michael De Vlieger_, May 04 2017, Version 10.1 *) %K A029945 nonn,look,base %O A029945 1,1 %A A029945 _Patrick De Geest_