匹配，合並，在R中查找重復值

Question

在R中，我想匹配和合並兩個矩陣。

例如，

> A
     ID   a  b  c  d  e  f  g
  1  ex   3  8  7  6  9  8  4
  2  am   7  5  3  0  1  8  3
  3  ple  8  5  7  9  2  3  1

> B
    col1
  1  a
  2  c
  3  e
  4  f

然后，我要匹配矩陣A的標題和矩陣B的第一列。

所以我做了

> C<-A[, c('ID', B[, 1])]

最終結果如下所示。

> C
     ID   a  c  e  f
  1  ex   3  7  9  8
  2  am   7  3  1  8
  3  ple  8  7  2  3

但是，如果矩陣B的某些值不在矩陣A中，如下所示，

> B
    col1
  1  a
  2  c
  3  e
  4  f
  5  x
  6  y

它說“下標超出范圍”。

如何避免這個問題？

（如何僅提取重復的列？）

Answer 1

查看是否可行：

C<-A[, c('ID', colnames(A)[colnames(A) %in% B[,1]])]