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 A179803 #15 May 04 2020 14:28:17
%S A179803 1,25,36,729,5476,927369,32752729,37724164,42562576,97357689,
%T A179803 2825135104,4325166756,4860041796,123715399824,167904077121,
%U A179803 247679410276,389724269841,442094669604,486004179600,610118772201,7473372660009,15049783154025,23983713798489,25315841305225
%N A179803 Numbers that contain the digital reverse of their square root.
%H A179803 Giovanni Resta, <a href="/A179803/b179803.txt">Table of n, a(n) for n = 1..97</a> (terms < 1.6*10^25)
%F A179803 a(n) = A115761(n)^2.
%e A179803 The square root of 729 is 27. 27's digital reverse is 72. 72 appears in 729.
%t A179803 fQ[n_] := StringPosition[ IntegerString[n^2], StringReverse@ IntegerString@ n] != {}; k = 1; lst = {}; While[k < 3879404, If[ fQ@k, AppendTo[lst, k^2]]; k++ ]; lst (* _Robert G. Wilson v_, Jul 28 2010 *)
%t A179803 drsrQ[n_]:=Module[{s=Sqrt[n]},MemberQ[Partition[Reverse[ IntegerDigits[ n]], IntegerLength[ s],1], IntegerDigits[s]]]; Select[Range[ 28*10^5]^2, drsrQ] (* _Harvey P. Dale_, Dec 15 2015 *)
%Y A179803 Cf. A115761.
%K A179803 nonn,base
%O A179803 1,2
%A A179803 _Dominick Cancilla_, Jul 27 2010
%E A179803 More terms from _Robert G. Wilson v_, Jul 28 2010
%E A179803 Terms a(22) and beyond from _Giovanni Resta_, May 04 2020