2015-06-30 119 views
0

假設我有以下數據:多不匹配的矢量

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

我試圖找到識別未由組1-3匹配的data元素的一種方便的方式(或任意數量的套)。在這個簡單的例子中,顯然是x

回答

3

你可以嘗試

setdiff(data, unlist(mget(ls(pattern='^set')))) 
#[1] "x" 
1
data <- data[!data %in% set] 

您可以使用上面的代碼中的適用聲明,如果你可以連接所有的套入數據幀。然而,將所有設置合併並使用上述語句會更容易