Question

我有两个不相等的载体

x <- c(5,5,5,5,5,5)
y <- c(5,5)

我想检查x中的所有元素是否等于y中的所有元素。

我试过if(mean(x) - mean(y) == 0 & sd(x) - sd(y) ==0){count=count+1} 然而，我意识到一些独特的元素组合可以对x和y具有相同的均值，并且具有相同的标准偏差。关于如何实现这一目标的任何建议？

Answer 1

对所有唯一值使用逻辑测试：

x <- c(5,5,5,5,5,5)
y <- c(5,5)
z <- c(3,5,5)

> ifelse(unique(x) == unique(y), TRUE, FALSE)
[1] TRUE

> ifelse(unique(x) == unique(z), TRUE, FALSE)
[1] FALSE  TRUE

如果您只想要一个输出，请使用all()，如果所有值都为TRUE，则返回TRUE：

> all(ifelse(unique(x) == unique(y), TRUE, FALSE))
[1] TRUE

> all(ifelse(unique(x) == unique(z), TRUE, FALSE))
[1] FALSE

如何检查一个向量中的元素是否等于R中的另一个向量？

1 个答案: