OFFSET
1,2
COMMENTS
Are there any squares in this sequence other than 1 and 49?
MATHEMATICA
With[{c=Flatten[IntegerDigits/@(Range[100]^2)]}, Table[FromDigits[Take[c, {(n(n-1))/2+1, (n(n-1))/2+n}]], {n, 20}]] (* Harvey P. Dale, Jul 21 2012 *)
CROSSREFS
KEYWORD
nonn,base
AUTHOR
Amarnath Murthy, Dec 16 2001
EXTENSIONS
Corrected and extended by Lior Manor Feb 13 2002
STATUS
approved