OFFSET
1,2
COMMENTS
LINKS
G. C. Greubel, Table of n, a(n) for the first 50 rows, flattened
EXAMPLE
Northwest corner:
1, 2, 3, 4, 5
3, 7, 11, 15, 19
6, 14, 23, 32, 41
10, 23, 38, 54, 70
MATHEMATICA
f[n_, 0] := 0; f[0, k_] := 0; (*needed for the weight array*)
f[n_, k_] := Min[n, k] + n - 1;
s[n_, k_] := Sum[f[i, j], {i, 1, n}, {j, 1, k}];
Table[s[n - k + 1, k], {n, 10}, {k, n, 1, -1}] // Flatten
CROSSREFS
KEYWORD
nonn,tabl
AUTHOR
Clark Kimberling, Feb 06 2011
STATUS
approved