我需要从整数向量创建值矩阵，其中，矩阵的行和列引用向量的索引，并且矩阵中的行/列索引的值如果为TRUE，则为TRUE。向量相等，否则为FALSE。下面的示例：
vector <- c(1, 1, 2, 1, 2)
matrix <- make_logical_pairwise(vector)
matrix
# [,1] [,2] [,3] [,4] [,5]
# [1,] T T F T F
# [2,] T T F T F
# [3,] F F T F T
# [4,] T T F T F
# [5,] F F T F T
如果对此有更好的数据结构，我很乐意尝试。逻辑矩阵用于与不同的矩阵相乘（逐个索引，而不是适当的矩阵乘法），在这里我只需要保持矩阵中与同一组的值相对应的值即可。