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
Robert Israel, Table of n, a(n) for n = 1..10000
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
KEYWORD
base,nonn
AUTHOR
Amarnath Murthy, Nov 05 2002
EXTENSIONS
More terms from R. J. Mathar, Nov 12 2006
STATUS
approved