OFFSET
1,3
COMMENTS
LINKS
G. C. Greubel, Table of n, a(n) for the first 50 rows, flattened
FORMULA
Column 1: 2^n. Row 1: 1,1,1,1,1,1,1,1,1,1,1,... All other terms: 0.
EXAMPLE
Northwest corner:
1...1...1...1...1...1...1
2...0...0...0...0...0...0
4...0...0...0...0...0...0
8...0...0...0...0...0...0
MATHEMATICA
(See A185738.)
f[n_, k_] := 0; f[n_, 1] := 2^(n - 1); f[1, k_] := 1;
TableForm[Table[f[n, k], {n, 1, 10}, {k, 1, 10}]] (*Array A185740*)
Table[f[n - k + 1, k], {n, 50}, {k, n, 1, -1}] // Flatten (* G. C. Greubel, Jul 12 2017 *)
CROSSREFS
KEYWORD
nonn,tabl
AUTHOR
Clark Kimberling, Feb 02 2011
STATUS
approved