OFFSET
1,2
COMMENTS
From Omar E. Pol, Mar 18 2018: (Start)
In the n-th row of the triangle the first differences together with its last term give the n-th row of triangle A138785 (see below):
Row..........: 1 2 3 4 5 ...
--- ---- ------- ------------ ----------------
This triangle: 1; 4, 2; 9, 5, 3; 20, 13, 7, 4; 35, 23, 15, 9, 5; ...
| | /| | /| /| | / | /| /| | / | / | /| /|
| |/ | |/ |/ | |/ |/ |/ | |/ |/ |/ |/ |
A138785......: 1; 2, 2; 4, 2, 3; 7, 6, 3, 4; 12, 8, 6, 4, 5; ... (End)
LINKS
Alois P. Heinz, Rows n = 1..141, flattened
FORMULA
EXAMPLE
Triangle begins:
1;
4, 2;
9, 5, 3;
20, 13, 7, 4;
35, 23, 15, 9, 5;
66, 47, 31, 19, 11, 6;
105, 75, 53, 35, 23, 13, 7;
...
MATHEMATICA
Table[With[{s = IntegerPartitions[n]}, Table[Total@ Flatten@ Map[Select[#, # >= k &] &, s], {k, n}]], {n, 11}] // Flatten (* Michael De Vlieger, Mar 19 2018 *)
CROSSREFS
Right border gives A000027.
Row sums give A066183. - Omar E. Pol, Mar 19 2018
KEYWORD
nonn,tabl
AUTHOR
Omar E. Pol, Feb 14 2012
EXTENSIONS
More terms from Alois P. Heinz, Feb 14 2012
STATUS
approved