|
%I #16 Sep 02 2021 14:09:39
%S 0,1,4,16,100,121,400,484,784,1156,3136,6724,7921,12769,23716,26896,
%T 59536,68644,238144,274576,532900,570025,643204,743044,1042441,
%U 1800964,1844164,2131600,4787344,5026564,7203856,7376656,9278116
%N Squares which are palindromes in base 3.
%H Chai Wah Wu, <a href="/A029985/b029985.txt">Table of n, a(n) for n = 1..521</a>
%H Patrick De Geest, <a href="http://www.worldofnumbers.com/square.htm">Palindromic Squares</a>
%H G. J. Simmons, <a href="/A002778/a002778.pdf">On palindromic squares of non-palindromic numbers</a>, J. Rec. Math., 5 (No. 1, 1972), 11-19. [Annotated scanned copy]
%t b3pQ[n_]:=Module[{idn3=IntegerDigits[n,3]},idn3==Reverse[idn3]]; Select[ Range[0,3200]^2,b3pQ] (* _Harvey P. Dale_, Aug 07 2011 *)
%Y Cf. A029984, A263607, A263608; also A002778, A003166.
%K nonn,base
%O 1,3
%A _Patrick De Geest_
|
