A141804 Row sums of triangle A141803.

1, 2, 3, 5, 8, 7, 15, 15, 18, 22, 33, 25, 40, 44, 47, 49, 64, 64, 83, 77, 86, 97, 119, 105, 123, 137, 145, 150, 177, 162, 195, 193, 214, 229, 250, 227, 264, 283, 302, 292, 333, 321, 363, 368, 376, 398, 446, 419, 455, 465, 489, 505, 551, 542, 580, 567, 602, 631

Offset: 1

Author

Gary W. Adamson, Jul 06 2008

Keywords

• nonn

Examples

			a(5) = 8 since row 5 of triangle A141803 = (1 + 2 + 3 + 2 + 0).
		

Links

• Ivan Neretin, Table of n, a(n) for n = 1..10000

Crossrefs

Cf. A141803.

Programs

Mathematica

Table[Total@Table[Mod[Total@IntegerDigits[n - i, i], i], {i, n - 1, 2, -1}], {n, 3, 60}] (* Ivan Neretin, Jun 18 2018 *)

Extensions

More terms from Ivan Neretin, Jun 18 2018