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 A161783 #8 Aug 01 2015 21:37:31
%S A161783 1,25,36,100,625,2500,3600,5776,10000,62500,141376,250000,360000,
%T A161783 390625,577600,1000000,6250000,14137600,14379264,25000000,36000000,
%U A161783 39062500,57760000,87909376,100000000,214651801,625000000,1413760000,2500000000
%N A161783 Squares n^2 whose decimal expansion contains n as a substring.
%C A161783 14379264 is in the list because 14379264 = 3792^2 and 3792 is a substring of 14379264.
%e A161783 1 contains its square root (1); 25 contains its square root (5); 3600 contains -- but does not end with -- its square root (60). - _Dominick Cancilla_, Jul 20 2010
%t A161783 fQ[n_] := StringPosition[ IntegerString[n^2], IntegerString@n] != {}; lst = {}; k = 1; While[k < 50001, If[ fQ@k, AppendTo[lst, k^2]]; k++ ]; lst (* _Robert G. Wilson v_, Jul 23 2010 *)
%Y A161783 Equals A018834^2. Cf. A035383.
%K A161783 nonn,base
%O A161783 1,2
%A A161783 _Claudio Meller_, Jun 19 2009
%E A161783 Edited by _N. J. A. Sloane_, Jul 23 2010