如何在R中求逆子集？

我试图在R中创建一个完全包含组的非重叠子集。第一个子集包含来自完全包含组的成对元素。另一个子集应该是完全包含组中的所有元素，而不是第一个子集中的所有元素

poplength <- 10
samples <- 7
numpair <- 2
totallyinclusivegroup <- sample(1:poplength, samples)
Subset1 <- sample(totallyinclusivegroup, size = numpair*2)

poplength试试：

尝试：

我们可以用
来否定
中的
%中的逻辑向量上进行code>，以便TRUE->FALSE，反之亦然

 out <- totallyinclusivegroup[!totallyinclusivegroup %in% Subset1]


或者更简单的选择是
setdiff

setdiff(totallyinclusivegroup, Subset1)
#[1] 3 1 8

如果存在重复元素，最好使用
vecsets
from
vsetdiff

library(vecsets)
vsetdiff(totallyinclusivegroup, Subset1)

我们可以用
来否定
中的
%中的逻辑向量上进行code>，以便TRUE->FALSE，反之亦然

 out <- totallyinclusivegroup[!totallyinclusivegroup %in% Subset1]


或者更简单的选择是
setdiff

setdiff(totallyinclusivegroup, Subset1)
#[1] 3 1 8

如果存在重复元素，最好使用
vecsets
from
vsetdiff

library(vecsets)
vsetdiff(totallyinclusivegroup, Subset1)

library(vecsets)
vsetdiff(totallyinclusivegroup, Subset1)