login
A070254
Perfect squares one more than a palindrome.
5
1, 4, 9, 100, 324, 576, 4225, 5776, 10000, 36864, 42025, 1000000, 3055504, 3640464, 5597956, 8803089, 32855824, 100000000, 360696064, 422919225, 10000000000, 30485858404, 30536863504, 32154945124, 59080108096, 86310801369, 304816618404, 1000000000000, 3490500050944
OFFSET
1,2
COMMENTS
All even powers of 10 are members of both A070254 and A027720.
LINKS
FORMULA
a(n) = A070253(n)^2 = A028504(n) + 1. - Giovanni Resta, Aug 29 2018
MATHEMATICA
Do[ If[a = IntegerDigits[n^2 - 1]; a == Reverse[a], Print[n^2]], {n, 1, 10^6}]
Select[Range[300000]^2, PalindromeQ[#-1]&] (* Requires Mathematica version 10 or later *) (* Harvey P. Dale, Aug 06 2018 *)
CROSSREFS
KEYWORD
nonn,base
AUTHOR
Amarnath Murthy, May 06 2002
EXTENSIONS
Edited by Jason Earls and Robert G. Wilson v, May 08 2002
Offset changed by and more terms from Giovanni Resta, Aug 28 2018
STATUS
approved