A082261 Row sums in A082259.

1, 22, 36, 376, 745, 378, 2758, 3232, 405, 6040, 13684, 3528, 16198, 19474, 10575, 34384, 35479, 10674, 65854, 178600, 48321, 108394, 161575, 117000, 445225, 392158, 136404, 695800, 778882, 2011950, 1332349, 1806496, 1849320, 2563600

Offset

1,2

Links

Table of n, a(n) for n=1..34.

Mathematica

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 *)

Crossrefs

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

Sequence in context: A167277 A084141 A259736 * A335373 A337460 A063252

Adjacent sequences: A082258 A082259 A082260 * A082262 A082263 A082264

Keyword

base,nonn

Author

Amarnath Murthy, Apr 12 2003

Extensions

Corrected and extended by Ryan Propper, Jul 16 2005

Status

approved