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 A014186 #17 Jul 08 2025 02:54:46
%S A014186 0,1,4,9,16,25,36,49,64,81,121,484,1089,1936,3025,4356,5929,7744,9801,
%T A014186 10201,12321,14641,17161,19881,22801,25921,29241,32761,36481,40804,
%U A014186 44944,49284,53824,58564,63504,68644,73984,79524,85264,91809,97969,104329
%N A014186 Squares of palindromes.
%H A014186 Vincenzo Librandi, <a href="/A014186/b014186.txt">Table of n, a(n) for n = 0..1099</a>
%F A014186 a(n) = A002113(n)^2. - _Michel Marcus_, Jan 04 2018
%t A014186 f[n_,b_]:=Module[{i=IntegerDigits[n,b]}, i==Reverse[i]];lst={}; Do[If[f[n,10],AppendTo[lst, n]], {n, 0, 400}]; lst^2 (* _Vincenzo Librandi_ Jan 04 2018 *)
%t A014186 Select[Range[0,400],PalindromeQ]^2 (* _Harvey P. Dale_, Aug 28 2021 *)
%o A014186 (Magma) [n^2: n in [0..600] | Intseq(n) eq Reverse(Intseq(n))]; // _Vincenzo Librandi_, Jan 04 2018
%Y A014186 Cf. A002113, A014187, A014188.
%K A014186 nonn,base
%O A014186 0,3
%A A014186 _N. J. A. Sloane_