%I #4 Oct 15 2013 10:34:39
%S 0,2,8,18,23,32,45,62,74,90,101,125,153,185,212,234,269,308,333,371,
%T 404,450,500,545,594,638,695,747,803,854,909,977,1031,1107,1169,1235,
%U 1314,1388,1457,1530,1607,1697,1782,1871,1955,2034,2126,2222,2313,2408,2507
%N a(n) = n^2 + sum of the digits of n^2.
%C Subsequence of A062028 (n + sum of the digits of n).
%t Table[n^2+Total[IntegerDigits[n^2]],{n,0,100}]
%Y Cf. A062028, A171614, A171615.
%K base,nonn
%O 0,2
%A _Zak Seidov_, Dec 13 2009