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 A035122 #31 Feb 16 2025 08:32:37 %S A035122 1,2,3,11,12,13,21,22,26,31,33,99,101,102,103,111,112,113,121,122,201, %T A035122 202,211,212,221,264,301,307,311,836,1001,1002,1003,1011,1012,1013, %U A035122 1021,1022,1031,1101,1102,1103,1111,1112,1113,1121,1122,1201,1202,1211 %N A035122 Roots of 'squares remaining square when written backwards'. %C A035122 Numbers with trailing zeros are excluded. %H A035122 Eric Weisstein's World of Mathematics, <a href="https://mathworld.wolfram.com/SquareNumber.html">Square Number</a> %H A035122 <a href="/index/Sq#sqrev">Index entry for sequences related to reversing digits of squares</a> %F A035122 a(n) = sqrt(A033294(n)). - _Michel Marcus_, Sep 22 2015 %e A035122 99^2 = 9801 -> 1089 = 33^2. %t A035122 Select[Range[10000], IntegerQ[Sqrt[FromDigits[Reverse[IntegerDigits[ #^2]]]]] &] (* and then delete terms ending with 0 - _N. J. A. Sloane_, Jul 08 2011 *) %t A035122 Sqrt[Select[Range[2000]^2, Mod[#, 10]!=0&&IntegerQ[Sqrt[FromDigits[Reverse[IntegerDigits[#]]]]]&]] (* _Vincenzo Librandi_, Sep 22 2015 *) %Y A035122 Cf. A033294, A035125. %K A035122 nonn,base %O A035122 1,2 %A A035122 _Patrick De Geest_, Nov 15 1998