login
Palindromic squares in base 16.
11

%I #18 Jun 01 2022 08:22:08

%S 0,1,4,9,289,1156,66049,74529,83521,93025,101761,264196,280900,298116,

%T 597529,1896129,16785409,19088161,21538881,67141636,68128516,71673156,

%U 76282756,81830116,2665553641,4295098369,4328718849

%N Palindromic squares in base 16.

%H Chai Wah Wu, <a href="/A029734/b029734.txt">Table of n, a(n) for n = 1..377</a> (terms 1..75 from Vincenzo Librandi)

%H Patrick De Geest, <a href="http://www.worldofnumbers.com/nobase10.htm">Palindromic numbers beyond base 10</a>

%t pb16Q[n_]:=Module[{idn16=IntegerDigits[n,16]}, idn16==Reverse[idn16]]; Select[Range[0, 200000]^2, pb16Q] (* _Vincenzo Librandi_, Jul 24 2014 *)

%Y Cf. A002779, A029738, A029806, A029983, A029985, A029987, A029989, A029991, A029993, A029995, A029997, A029999, A030074, A030075.

%K nonn,base

%O 1,3

%A _Patrick De Geest_