A163260 Row sums of A163259.

0, 0, 1, 1, 7, 6, 30, 43, 111, 184, 553, 694, 2098, 3576, 8186, 13689, 35791, 54928, 141366, 239002, 548162, 956743, 2328296, 3754337, 9133084, 15963906, 36115030, 63177196, 148953028, 251144293, 590484909, 1038294564, 2335617735, 4138282064, 9539100013, 16441453580, 37863251785

Offset

1,5

Links

G. C. Greubel, Table of n, a(n) for n = 1..1000

Formula

a(n) = Sum_{k=1,..,n} ( Sum_{i=1,..,k-1} mod(binomial(n, k + 1), binomial(n, k)) ). - G. C. Greubel, Dec 12 2016

Mathematica

T[n_, k_] := Mod[Binomial[n, k + 1], Binomial[n, k]]; Join[{0}, Table[Sum[T[n, k], {k, 1, n - 1}], {n, 1, 20}]] (* G. C. Greubel, Dec 12 2016 *)

Crossrefs

Cf. A163259.

Sequence in context: A338137 A341289 A322049 * A073112 A070425 A163842

Adjacent sequences: A163257 A163258 A163259 * A163261 A163262 A163263

Keyword

nonn

Author

Mats Granvik, Jul 23 2009

Extensions

Corrected a(20). Mats Granvik, Jul 24 2009

Terms a(21) onward added by G. C. Greubel, Dec 12 2016

Status

approved