A077347 - OEIS

A077347

Final terms of rows of A077346.

1, 225, 361, 441, 5329, 6400, 7744, 80089, 90000, 101124, 112896, 122500, 135424, 145924, 157609, 165649, 179776, 1806336, 1901641, 2013561, 2114116, 2220100, 2325625, 2427364, 2528100, 2637376, 2742336, 2845969, 2951524, 3059001

(list; graph; refs; listen; history; text; internal format)

OFFSET

1,2

COMMENTS

a(n) = n-th square beginning with n. A018796 contains initial terms of rows. Subsidiary sequence: There can be a rearrangement of squares in groups so that the n-th group contains n squares beginning with n and not occurring earlier. E.g., the initial term of row 25 would be 256 and not 25 and accordingly the final terms would differ.

LINKS

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

MAPLE

startsWith := proc(n, dig) local nshft ; nshft := n ; while nshft > dig do nshft := floor(nshft/10) ; od ; if dig = nshft then RETURN(true) ; else RETURN(false) ; fi ; end: A077347 := proc(n) local candid, c; candid := 1 ; for c from 1 to n do while not startsWith(candid^2, n) do candid := candid+1 ; od ; if c = n then RETURN(candid^2) ; fi ; candid := candid+1 ; od ; end: for n from 1 to 50 do printf("%a, ", A077347(n)) ; od ; # R. J. Mathar, Nov 12 2006

CROSSREFS

Cf. A018796, A077346, A077348, A077349.

Sequence in context: A202005 A359598 A207639 * A207640 A267892 A363217

Adjacent sequences: A077344 A077345 A077346 * A077348 A077349 A077350

KEYWORD

base,nonn

AUTHOR

Amarnath Murthy, Nov 05 2002

EXTENSIONS

More terms from R. J. Mathar, Nov 12 2006

STATUS

approved