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 A062917 #24 Feb 16 2025 08:32:45 %S A062917 144,169,288,441,528,768,825,867,882,961,1089,1584,2178,4851,8712, %T A062917 9801,10404,10609,10989,12544,12769,13104,14544,14884,15984,20808, %U A062917 21978,26208,27648,27848,36828,40131,40401,44521,44541,48139,48841,48951 %N A062917 Nonpalindromic numbers k such that k is not divisible by 10 and k*R(k) is a square, where R(k) is the reversal of k (A004086). %C A062917 The sequence has infinitely many terms, some of which can be derived from 1089 and 2178. %H A062917 Giovanni Resta, <a href="/A062917/b062917.txt">Table of n, a(n) for n = 1..2338</a> (terms < 10^12, n = 1..150 from Harvey P. Dale, n = 151..1000 from Chai Wah Wu) %H A062917 Eric Weisstein's World of Mathematics, <a href="https://mathworld.wolfram.com/Reversal.html">Reversal</a> %e A062917 2178 is a term as 2178*8712 = 4356^2. %e A062917 10891089 is a term as 10891089*98019801 = 32673267^2. %t A062917 okQ[n_]:=Module[{idn=IntegerDigits[n],ridn},ridn=Reverse[idn];idn!= ridn && !Divisible[n,10]&&IntegerQ[Sqrt[n FromDigits[ridn]]]]; Select[Range[ 50000], okQ] (* _Harvey P. Dale_, Dec 08 2012 *) %Y A062917 Cf. A004086. %Y A062917 Subsequence of A029742. %K A062917 nonn,base,easy %O A062917 1,1 %A A062917 _Amarnath Murthy_, Jul 02 2001 %E A062917 More terms from _Reiner Martin_, Jul 10 2001