A059274 Analog of A059226 in which left diagonal is all 1's.

1, 1, 2, 1, 5, 8, 1, 11, 28, 39, 1, 23, 80, 164, 214, 1, 47, 208, 548, 1010, 1274, 1, 95, 512, 1632, 3744, 6490, 8028, 1, 191, 1216, 4528, 12248, 25868, 43132, 52698, 1, 383, 2816, 11968, 37024, 90624, 181272, 294366, 356630, 1, 767

Offset: 0

Author

N. J. A. Sloane, Jan 24 2001

Keywords

• nonn
• tabl

Examples

			Triangle begins with:
  1;
  1,    2;
  1,    5,    8;
  1,   11,   28,   39;
  1,   23,   80,  164,  214;
  1,   47,  208,  548, 1010, 1274;
  1,   95,  512, 1632, 3744, 6490, 8028;
  ... - _G. C. Greubel_, Jan 03 2017
		

Links

• G. C. Greubel, Table of n, a(n) for the first 51 rows, flattened

Crossrefs

Cf. A059226, A059274.

Programs

Mathematica

T[i_, j_]:= T[i, j] = Module[{r, s, t1}, If[i == 0 && j == 0, Return[1]];
If[j == 0, Return[1]]; t1 = T[i, j - 1]; For[r = 0, r <= i - j, r++,
For[s = 0, s <= j, s++, If[r + s != i, t1 = t1 + T[r + s, s]]]];
Return[t1]]; Table[T[n, k], {n, 0, 10}, {k, 0, n}] // Flatten (* G. C. Greubel, Jan 03 2017 *)