A050634 a(n+1) is next smallest square ending with a(n), initial term is 1.

1, 81, 1681, 1461681, 220861461681, 31071113326220861461681, 36510705834446371569631071113326220861461681, 268496773864458678522722709023395604054900436510705834446371569631071113326220861461681

Offset

1,2

Links

Table of n, a(n) for n=1..8.

Mathematica

d[n_]:=IntegerDigits[n]; t={m=1}; Do[If[Take[d[x=n^2], -Length[y=d[m]]]==y, AppendTo[t, m=x]], {n, Flatten[Table[10k+{-1, 1}, {k, 50000}]]}]; t (* Jayanta Basu, May 30 2013 *)

Crossrefs

Cf. A050635, A048557, A050628.

Sequence in context: A237404 A237549 A107914 * A065791 A237503 A268974

Adjacent sequences: A050631 A050632 A050633 * A050635 A050636 A050637

Keyword

nonn,base

Author

Patrick De Geest, Jul 15 1999

Extensions

More terms from Jonathan Cross (jcross(AT)wcox.com), Oct 09 2001

Status

approved