login
A159926
The sum of all terms in row 1 through m of triangle A159924.
3
1, 4, 16, 77, 447, 3053, 23978, 212750, 2103523, 22926004, 273008526, 3526184835, 49093579165, 732877502641, 11676946463092, 197775212369924, 3548276876195541, 67219485435345356, 1340841431830711580
OFFSET
1,2
COMMENTS
A159926(m) - A159926(m-1) = A159925(m), for m >= 2. A159925 contains the row-sums of triangle A159924.
LINKS
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: A159926 := proc(n) add( A159925(k), k=1..n) ; end: seq(A159926(n), n=1..40) ; # R. J. Mathar, Apr 29 2009
MATHEMATICA
Accumulate@ Map[Total, Block[{m = 0}, NestList[Block[{w = #}, AddTo[m, Total@ w]; Append[m + w, 1]] &, {1}, 18]] (* Michael De Vlieger, Oct 30 2017 *)
CROSSREFS
Sequence in context: A196192 A367261 A364474 * A020051 A020006 A207653
KEYWORD
nonn
AUTHOR
Leroy Quet, Apr 26 2009
EXTENSIONS
More terms from R. J. Mathar, Apr 29 2009
STATUS
approved