OFFSET
1,3
LINKS
Chai Wah Wu, Table of n, a(n) for n = 1..408
Patrick De Geest, Palindromic Squares
EXAMPLE
5^2 = 25 in base 4 is 121, which is a palindrome, hence 25 is in the sequence.
6^2 = 36 in base 4 is 210, which is not a palindrome, so 36 is not in the sequence.
MATHEMATICA
palindromicQ[n_, b_:10] := TrueQ[IntegerDigits[n, b] == Reverse[IntegerDigits[n, b]]]; Select[Range[1000]^2, palindromicQ[#, 4] &] (* Alonso del Arte, Mar 04 2017 *)
Select[Range[0, 70000]^2, IntegerDigits[#, 4]==Reverse[IntegerDigits[#, 4]]&] (* Harvey P. Dale, May 07 2022 *)
PROG
(PARI) lista(nn) = for (n=0, nn, d = digits(n^2, 4); if (Vecrev(d) == d, print1(n^2, ", "))); \\ Michel Marcus, Mar 05 2017
CROSSREFS
KEYWORD
nonn,base
AUTHOR
STATUS
approved