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 A115761 #18 Jul 15 2021 21:22:49
%S A115761 1,5,6,27,74,963,5723,6142,6524,9867,53152,65766,69714,351732,409761,
%T A115761 497674,624279,664902,697140,781101,2733747,3879405,4897317,5031485,
%U A115761 6317056,6971400,8403702,9324454,16013465,21646858,34679962,36909226,38794051,40781862,41065012
%N A115761 Numbers k such that the digits of k^2, reversed, include the digits of k as a substring.
%H A115761 Giovanni Resta, <a href="/A115761/b115761.txt">Table of n, a(n) for n = 1..97</a> (terms < 4*10^12)
%e A115761 963^2 = 927(369).
%t A115761 fQ[n_] := StringPosition[ IntegerString[n^2], StringReverse@ IntegerString@n] != {}; k = 1; lst = {}; While[k < 38794050, If[ fQ@k, AppendTo[lst, k]]; k++ ]; lst (* _Robert G. Wilson v_, Jul 28 2010 *)
%t A115761 Select[Range[37*10^6],SequenceCount[Reverse[IntegerDigits[#^2]], IntegerDigits[ #]]>0&] (* The program uses the SequenceCount function from Mathematica version 10 *) (* _Harvey P. Dale_, May 02 2016 *)
%Y A115761 Contains A269588 as a subsequence.
%Y A115761 Cf. A115762, A115763, A115764, A115738, A179803.
%K A115761 nonn,base
%O A115761 1,2
%A A115761 _Giovanni Resta_, Jan 30 2006
%E A115761 More terms from _Robert G. Wilson v_, Jul 28 2010
%E A115761 Terms a(33) and beyond from _Giovanni Resta_, May 04 2020