|
|
A141804
|
|
Row sums of triangle A141803.
|
|
2
|
|
|
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
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,2
|
|
LINKS
|
|
|
EXAMPLE
|
a(5) = 8 since row 5 of triangle A141803 = (1 + 2 + 3 + 2 + 0).
|
|
MATHEMATICA
|
Table[Total@Table[Mod[Total@IntegerDigits[n - i, i], i], {i, n - 1, 2, -1}], {n, 3, 60}] (* Ivan Neretin, Jun 18 2018 *)
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|