OFFSET
1,2
MATHEMATICA
With[{c=Flatten[IntegerDigits/@(Range[400]^2)]}, Table[Total[Take[c, {(n(n-1))/2+1, (n(n-1))/2+n}]], {n, 60}]] (* Harvey P. Dale, Jul 21 2012 *)
CROSSREFS
KEYWORD
nonn,base
AUTHOR
Amarnath Murthy, Dec 16 2001
EXTENSIONS
More terms from Antonio G. Astudillo (afg_astudillo(AT)lycos.com), Apr 01 2003
STATUS
approved