A082261 - OEIS

%I #8 Nov 18 2018 00:22:34

%S 1,22,36,376,745,378,2758,3232,405,6040,13684,3528,16198,19474,10575,

%T 34384,35479,10674,65854,178600,48321,108394,161575,117000,445225,

%U 392158,136404,695800,778882,2011950,1332349,1806496,1849320,2563600

%N Row sums in A082259.

%t Do[s = t = 0; i = 1; While[t < n, If[Plus @@ IntegerDigits[i*n] == n, t++; s += i*n]; i++ ]; Print[s], {n, 1, 50}] (* _Ryan Propper_, Jul 16 2005 *)

%Y Cf. A082259, A082260, A082262, A082263, A002998.

%K base,nonn

%O 1,2

%A _Amarnath Murthy_, Apr 12 2003

%E Corrected and extended by _Ryan Propper_, Jul 16 2005