A193592 Triangle read by rows having n-th row 1, n, n-1, n-2,..., 2, 1 for n>=0.

1, 1, 1, 1, 2, 1, 1, 3, 2, 1, 1, 4, 3, 2, 1, 1, 5, 4, 3, 2, 1, 1, 6, 5, 4, 3, 2, 1, 1, 7, 6, 5, 4, 3, 2, 1, 1, 8, 7, 6, 5, 4, 3, 2, 1, 1, 9, 8, 7, 6, 5, 4, 3, 2, 1, 1, 10, 9, 8, 7, 6, 5, 4, 3, 2, 1, 1, 11, 10, 9, 8, 7, 6, 5, 4, 3, 2, 1, 1, 12, 11, 10, 9, 8, 7, 6, 5, 4, 3, 2, 1

Offset

0,5

Comments

The triangle with its first column removed is A004736. - Hartmut F. W. Hoft, Jun 05 2017

Links

Table of n, a(n) for n=0..90.

Example

Triangle begins:
1
1....1
1....2....1
1....3....2....1
1....4....3....2....1

Mathematica

a193592[n_] := Map[Prepend[Range[#, 1, -1], 1]&, Range[0, n]]
Flatten[a193592[12] (* data *)
TableForm[a193592[4]] (* triangle *) (* Hartmut F. W. Hoft, Jun 05 2017 *)

Crossrefs

Cf. A193593, A004736.

Sequence in context: A025474 A136575 A309898 * A243714 A343656 A278427

Adjacent sequences: A193589 A193590 A193591 * A193593 A193594 A193595

Keyword

nonn,tabl

Author

Clark Kimberling, Jul 31 2011

Extensions

Corrected and added more terms by Hartmut F. W. Hoft, Jun 05 2017

Status

approved