多不匹配的矢量

Question

假设我有以下数据：

data <- c("a", "b", "c", "x") 
set1 <- c("a") 
set2 <- c("b") 
set3 <- c("c") 

我试图找到识别未由组1-3匹配的data元素的一种方便的方式（或任意数量的套）。在这个简单的例子中，显然是x。

Answer 1

你可以尝试

setdiff(data, unlist(mget(ls(pattern='^set')))) 
#[1] "x" 

Answer 2

data <- data[!data %in% set] 

您可以使用上面的代码中的适用声明，如果你可以连接所有的套入数据帧。然而，将所有设置合并并使用上述语句会更容易