The OEIS is supported by the many generous donors to the OEIS Foundation. Hints (Greetings from The On-Line Encyclopedia of Integer Sequences!)
 A159924 Triangle read by rows: a(m,m) = 1, for all m. For n < m, a(m,n) = a(m-1,n) + (sum of all terms in rows 1 through m-1). 4
 1, 2, 1, 6, 5, 1, 22, 21, 17, 1, 99, 98, 94, 78, 1, 546, 545, 541, 525, 448, 1, 3599, 3598, 3594, 3578, 3501, 3054, 1, 27577, 27576, 27572, 27556, 27479, 27032, 23979, 1, 240327, 240326, 240322, 240306, 240229, 239782, 236729, 212751, 1, 2343850 (list; table; graph; refs; listen; history; text; internal format)
 OFFSET 1,2 COMMENTS Row sums are A159925. Sum of all terms in rows 1 through m 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..11476 (rows 1 <= n <= 150). EXAMPLE The triangle starts like this: 1, 2,1, 6,5,1, 22,21,17,1 The sum of all these terms is 77. So adding 77 to each of the terms of the 4th row gets the fifth row: 22+77=99, 21+77=98, 17+77=94, 1+77=78, and the final terms is set at 1. So row 5 is: 99,98,94,78,1. 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: for n from 1 to 13 do for m from 1 to n do printf("%d, ", A159924(n, m)) ; od: od: # R. J. Mathar, Apr 29 2009 MATHEMATICA Block[{m = 0}, NestList[Block[{w = #}, AddTo[m, Total@ w]; Append[m + w, 1]] &, {1}, 9]] // Flatten (* Michael De Vlieger, Sep 23 2017 *) CROSSREFS Cf. A159925, A159926, A159927. Sequence in context: A260914 A159965 A116395 * A133367 A179456 A214152 Adjacent sequences:  A159921 A159922 A159923 * A159925 A159926 A159927 KEYWORD nonn,tabl AUTHOR Leroy Quet, Apr 26 2009 EXTENSIONS More terms from R. J. Mathar, Apr 29 2009 STATUS approved

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recents
The OEIS Community | Maintained by The OEIS Foundation Inc.

Last modified July 7 12:27 EDT 2022. Contains 355148 sequences. (Running on oeis4.)