A129686 - OEIS

%I #12 Feb 20 2022 01:25:41

%S 1,0,1,1,0,1,0,1,0,1,0,0,1,0,1,0,0,0,1,0,1,0,0,0,0,1,0,1,0,0,0,0,0,1,

%T 0,1,0,0,0,0,0,0,1,0,1,0,0,0,0,0,0,0,1,0,1,0,0,0,0,0,0,0,0,1,0,1,0,0,

%U 0,0,0,0,0,0,0,1,0,1

%N Triangle read by rows: row n is 0^(n-3), 1, 0, 1.

%C Alternate term operator, sums.

%C Let A129686 = matrix M, with V any sequence as a vector. Then M*V is the alternate term sum operator. Given V = [1,2,3,...], M*V = [1, 2, 4, 6, 8, 10, 12, 14, ...]. The analogous operation using A097807, (the pairwise operator), gives [1, 3, 5, 7, 9, 11, 13, 15, ...]. Binomial transform of A129686 = A124725. A129686 * A007318 = A129687. Row sums of A129686 = (1, 1, 2, 2, 2, ...).

%F As an infinite lower triangular matrix, (1,1,1,...) in the main diagonal, (0,0,0,...) in the subdiagonal and (1,1,1,...) in the subsubdiagonal; with the rest zeros. (1, 0, 1, 0, 0, 0, ...) in every column.

%e First few rows of the triangle:

%e   1;

%e   0, 1;

%e   1, 0, 1;

%e   0, 1, 0, 1

%e   0, 0, 1, 0, 1;

%e   0, 0, 0, 1, 0, 1;

%e   ...

%t T[n_, k_] := If[k == n || k == n-2, 1, 0];

%t Table[T[n, k], {n, 1, 12}, {k, 1, n}] // Flatten (* _Jean-François Alcover_, Jul 10 2019 *)

%o (PARI) tabl(nn) = {t129686 = matrix(nn, nn, n, k, (k<=n)*((k==n) || (k==(n-2)))); for (n = 1, nn, for (k = 1, n, print1(t129686[n, k], ", ");););} \\ _Michel Marcus_, Feb 12 2014

%Y Cf. A124725, A129687.

%K nonn,tabl

%O 1,1

%A _Gary W. Adamson_, Apr 28 2007

%E More terms from _Michel Marcus_, Feb 12 2014