A144464 Triangle T(n,m) read by rows: T(n,m) = 2^min(m,n-m).

1, 1, 1, 1, 2, 1, 1, 2, 2, 1, 1, 2, 4, 2, 1, 1, 2, 4, 4, 2, 1, 1, 2, 4, 8, 4, 2, 1, 1, 2, 4, 8, 8, 4, 2, 1, 1, 2, 4, 8, 16, 8, 4, 2, 1, 1, 2, 4, 8, 16, 16, 8, 4, 2, 1, 1, 2, 4, 8, 16, 32, 16, 8, 4, 2, 1

Offset

0,5

Links

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

Formula

Row sums: sum_{m=0..n} T(n,m) = A027383(n).

T(n,k) = 2^A004197(n,k). - Philippe Deléham, Feb 25 2014

Example

The triangle starts in row n=0 as:
{1},
{1, 1},
{1, 2, 1},
{1, 2, 2, 1},
{1, 2, 4, 2, 1},
{1, 2, 4, 4, 2, 1},
{1, 2, 4, 8, 4, 2, 1},
{1, 2, 4, 8, 8, 4, 2, 1},
{1, 2, 4, 8, 16, 8, 4, 2, 1},
{1, 2, 4, 8, 16, 16, 8, 4, 2, 1},
{1, 2, 4, 8, 16, 32, 16, 8, 4, 2, 1}

Mathematica

Clear[f, t]; f[n_, m_] = If[m <= Floor[n/2], m, n - m]; Table[Table[f[n, m], {m, 0, n}], {n, 0, 10}]; Flatten[%]

Prog

(PARI) T(n, m)=1<<min(m, n-m) \\ Charles R Greathouse IV, Jan 15 2012

Crossrefs

Cf. A004197, A152714, A152716, A152717.

Sequence in context: A320747 A348690 A238392 * A138015 A327742 A103444

Adjacent sequences: A144461 A144462 A144463 * A144465 A144466 A144467

Keyword

nonn,easy,tabl

Author

Roger L. Bagula and Gary W. Adamson, Oct 09 2008

Extensions

Offset corrected by the Associate Editors of the OEIS, Sep 11 2009

Better name by Philippe Deléham, Feb 25 2014

Status

approved