T = [
1 1 1 0;
1 1 1 0;
1 1 0 0;
1 0 0 1;
1 0 0 1;
1 0 0 1;
1 0 0 1;
0 0 1 1
]
# Create the coappearance matrix
Q = T' * T
println("Coappearance matrix Q:")
display(Q)Coappearance matrix Q:
4×4 Matrix{Int64}:
7 3 2 4
3 3 2 0
2 2 3 1
4 0 1 5





