假设我们有一个包含重复值的向量,我们想通过foreach()函数计算唯一值。以下是一种解决方案。
# 创建一个包含重复值的向量
vec <- c(1, 2, 3, 1, 2, 4, 5, 3)
# 加载‘foreach’包
library(foreach)
# 创建foreach()循环,以计算唯一值
unique.f <- function(vec) {
foreach(i = unique(vec)) %>%
concatenate %>%
collect
}
# 测试结果
unique.f(vec)
输出应该为 (1, 2, 3, 4, 5)
。