A152716 Triangle T(n,k) read by rows: T(n,k) = 4^min(k, n-k) = 4^A004197(n,k).
1, 1, 1, 1, 4, 1, 1, 4, 4, 1, 1, 4, 16, 4, 1, 1, 4, 16, 16, 4, 1, 1, 4, 16, 64, 16, 4, 1, 1, 4, 16, 64, 64, 16, 4, 1, 1, 4, 16, 64, 256, 64, 16, 4, 1, 1, 4, 16, 64, 256, 256, 64, 16, 4, 1, 1, 4, 16, 64, 256, 1024, 256, 64, 16, 4, 1
Offset: 0
Examples
{1}, {1, 1}, {1, 4, 1}, {1, 4, 4, 1}, {1, 4, 16, 4, 1}, {1, 4, 16, 16, 4, 1}, {1, 4, 16, 64, 16, 4, 1}, {1, 4, 16, 64, 64, 16, 4, 1}, {1, 4, 16, 64, 256, 64, 16, 4, 1}, {1, 4, 16, 64, 256, 256, 64, 16, 4, 1}, {1, 4, 16, 64, 256, 1024, 256, 64, 16, 4, 1}
Programs
-
Mathematica
Clear[a, k, m]; k = 4; a[0] = {1}; a[1] = {1, 1}; a[n_] := a[n] = Join[{1}, k*a[n - 2], {1}]; Table[a[n], {n, 0, 10}]; Flatten[%]
Formula
T(n,k) = 4^min(k, n-k). - Philippe Deléham, Feb 25 2014
T(n,k) = A144464(n,k)^2. - Philippe Deléham, Feb 26 2014
Extensions
Better name by Philippe Deléham, Feb 25 2014
Comments