A159925 Row sums of triangle A159924.

1, 3, 12, 61, 370, 2606, 20925, 188772, 1890773, 20822481, 250082522, 3253176309, 45567394330, 683783923476, 10944068960451, 186098265906832, 3350501663825617, 63671208559149815, 1273621946395366224

Offset

1,2

Comments

The sum of all terms in rows 1 through m of triangle A159924 is A159926(m). A159926(m) - A159926(m-1) = A159925(m), for m >= 2.

Links

Michael De Vlieger, Table of n, a(n) for n = 1..449

Maple

A159924 := proc(n, m) option remember ; local s; if n = m then 1; else s := add(add(procname(r, c), c=1..r), r=1..n-1) ; procname(n-1, m)+s ; fi; end: A159925 := proc(n) local m; add( A159924(n, m), m=1..n) ; end: seq(A159925(n), n=1..40) ; # R. J. Mathar, Apr 29 2009

Mathematica

Total /@ Block[{m = 0}, NestList[Block[{w = #}, AddTo[m, Total@ w]; Append[m + w, 1]] &, {1}, 18]] (* Michael De Vlieger, Oct 30 2017 *)

Crossrefs

Cf. A159924, A159926.

Sequence in context: A378889 A378828 A182970 * A331607 A235802 A317169

Adjacent sequences: A159922 A159923 A159924 * A159926 A159927 A159928

Keyword

nonn

Author

Leroy Quet, Apr 26 2009

Extensions

More terms from R. J. Mathar, Apr 29 2009

Status

approved