r - 如何检查矩阵是否是矩阵列表的元素？在 R

Question

我对 R 编程很陌生。

我有一个数字矩阵 mat ，以及矩阵列表 matlist .我想检查矩阵是否mat与 matlist 的任何元素匹配(即相同) .我试过 %in%方法，但这并没有给我我希望的输出。

这是类似于我的代码的东西。

mat <- rbind(c(0,1),
             c(1,0))
mat2 <- rbind(c(1,1),
              c(1,0))
matlist <- vector(mode="list", 2)
matlist[[1]] <- mat
matlist[[2]] <- mat2

如果我再尝试 mat %in% matlist我得到:
FALSE FALSE FALSE FALSE
我正在寻找这样的表达式，它的计算结果为 TRUE .

这看起来应该很简单，但我找不到答案!

Answer 1

你可以尝试这样的事情:
sapply(matlist,function(x) identical(x,mat)) ，或如@jbaums 在下面提到的:sapply(matlist,identical,mat)
或者自己构建一个自定义函数来检查任何矩阵列表中的任何矩阵:

matrix_is_in <- function(my_mat, my_mat_list) {
      sapply(my_matlist, function(x) identical(x, my_mat))
}

然后试试看:
matrix_is_in(mat,matlist)