A117755 Squares which remain squares when each digit is replaced by the next digit.

0, 9, 25, 2025, 13225, 1974025, 4862025, 6943225, 60415182025, 207612366025, 916408817340025, 9960302475729225, 153668543313582025, 1978088677245614025, 13876266042653742025, 20761288044852366025, 47285734107144405625, 406066810454367265225

Offset: 1

Author

Luc Stevens (lms022(AT)yahoo.com), Apr 14 2006

Keywords

• base
• nonn

Comments

Replace 1 with 2, 2 with 3, ..., 8 with 9 and 9 with 0.

Examples

			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.
		

Links

• Max Alekseyev, Table of n, a(n) for n = 1..22

Crossrefs

Cf. A048379, A061843, A061844, A127856.

Programs

Mathematica

Select[Range[0, 500000]^2, IntegerQ[Sqrt[FromDigits[(1 + IntegerDigits[ # ]) /. 10-> 0]]] &] (* Harvey P. Dale, Jan 21 2007 *)

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