OFFSET
1,2
COMMENTS
Replace 1 with 2, 2 with 3, ..., 8 with 9 and 9 with 0.
LINKS
Max Alekseyev, Table of n, a(n) for n = 1..22
EXAMPLE
13225 is in the sequence because (1) it is a square and (2)if we transform it we get 24336 and this is also a square.
MATHEMATICA
Select[Range[500000]^2, IntegerQ[(FromDigits[((1 + IntegerDigits[ # ]) /. 10-> 0])^1/2 &] (* Harvey P. Dale, Jan 21 2007 *)
CROSSREFS
KEYWORD
base,nonn
AUTHOR
Luc Stevens (lms022(AT)yahoo.com), Apr 14 2006
EXTENSIONS
More terms from Harvey P. Dale, Jan 21 2007
3 more terms from Donovan Johnson, Apr 03 2008
a(14)-a(21) from Max Alekseyev, Oct 22 2008
a(1) = 0 prepended by Max Alekseyev, Jul 26 2023
STATUS
approved