如何在R中的数据帧的2D矩阵中找到重复的值/数据点及其索引？

Question

例如，假设我有矩阵A

  x  y z    f
1 1  2 A 1005
2 2  4 B 1002
3 3  2 B 1001
4 4  8 C 1001
5 5 10 D 1004
6 6 12 D 1004
7 7 11 E 1005
8 8 14 E 1003

从这个矩阵中，我想找到重复的值，例如1001、1005，D，2（在第三列中），我还想找到它们的索引（哪一行或哪一个位置）。

我是R的新手！ 显然，可以使用for循环逐个元素地进行简单搜索，但是我想知道，R中是否有针对此类问题的函数。

此外，我尝试使用重复的和唯一的，这两个函数都为我提供了重复的行号或列号，它们还为我提供了重复的行数，但是我无法使用这两个函数来搜索整个矩阵！

Answer 1

您可以编写一个相当简单的函数来获取此信息。 但是请注意，此解决方案适用于matrix 。 它不适用于data.frame 。 使用data.frame数据结构是列表的子集这一事实，可以为data.frame编写类似的函数。

# example data
set.seed(234)
m <- matrix(sample(1:10, size=100, replace=T), 10)

find_matches <- function(mat, value) {
  nr <- nrow(mat)
  val_match <- which(mat == value)
  out <- matrix(NA, nrow= length(val_match), ncol= 2)
  out[,2] <- floor(val_match / nr) + 1
  out[,1] <- val_match %% nr
  return(out)
}

R> m 
      [,1] [,2] [,3] [,4] [,5] [,6] [,7] [,8] [,9] [,10]
 [1,]    8    6    6    7    6    7    4   10    6     9
 [2,]    8    6    6    3   10    4    5    4    6     9
 [3,]    1    6    9    2    9    2    3    6    4     2
 [4,]    8    6    7    8    3    9    9    4    9     2
 [5,]    1    1    5    6    7    1    5    1   10     6
 [6,]    7    5    4    7    8    2    4    4    7    10
 [7,]   10    4    7    8    3    1    8    6    3     4
 [8,]    8    8    2    2    7    5    6    4   10     4
 [9,]   10    2    9    6    6    9    7    2    4     7
[10,]    3    9    9    4    2    7    7    2    9     6
R> find_matches(m, 8)
      [,1] [,2]
 [1,]    1    1
 [2,]    2    1
 [3,]    4    1
 [4,]    8    1
 [5,]    8    2
 [6,]    4    4
 [7,]    7    4
 [8,]    6    5
 [9,]    7    7

在此功能中，行索引在列1中输出，列索引在列2中输出