A triangle sequence from matrix polynomials of a three symbol type {0, 1, -1}: c(i,k)= Floor[Mod[i/2^k, 2]]; M(d)=Table[If[Sum[c(n, k)*c(m, k), {k, 0, d - 1}] == 0, 1, If[Sum[c(n, k)*c(m, k), {k, 0, d - 1}] == 1, -1, 0]], {n, 0, d - 1}, {m, 0, d - 1}].
A158417
A triangle sequence from matrix polynomials of a three symbol type {0, 1, -1}: c(i,k)= Floor[Mod[i/2^k, 2]]; M(d)=Table[If[Sum[c(n, k)*c(m, k), {k, 0, d - 1}] == 0, 1, If[Sum[c(n, k)*c(m, k), {k, 0, d - 1}] == 1, -1, 0]], {n, 0, d - 1}, {m, 0, d - 1}].
Terms
- a(0) =1a(1) =1a(2) =-1a(3) =-2a(4) =0a(5) =1a(6) =4a(7) =4a(8) =-1a(9) =-1a(10) =12a(11) =-4a(12) =-7a(13) =1a(14) =1a(15) =-24a(16) =-16a(17) =18a(18) =10a(19) =-2a(20) =-1a(21) =-72a(22) =48a(23) =66a(24) =-22a(25) =-15a(26) =2a(27) =1a(28) =-216a(29) =432
External references
- oeis: A158417