在R语言中,可以使用group_by()
函数将数据按照ID进行分组,然后使用summarise()
函数计算每个组内两列的比较结果。
以下是一个示例代码:
# 导入dplyr包
library(dplyr)
# 创建示例数据
df <- data.frame(ID = c(1, 1, 2, 2, 3, 3),
Col1 = c(10, 20, 30, 40, 50, 60),
Col2 = c(15, 25, 35, 45, 55, 65))
# 按ID分组,比较Col1和Col2
result <- df %>%
group_by(ID) %>%
summarise(compare_result = ifelse(all(Col1 == Col2), "相等", "不相等"))
# 输出结果
print(result)
运行以上代码将输出如下结果:
# A tibble: 3 x 2
ID compare_result
1 1 不相等
2 2 不相等
3 3 不相等
上述代码中,首先使用group_by(ID)
将数据按照ID进行分组,然后使用summarise(compare_result = ifelse(all(Col1 == Col2), "相等", "不相等"))
计算每个组内Col1和Col2的比较结果。如果每个组内的Col1和Col2都相等,则结果为"相等",否则为"不相等"。最后,使用print(result)
输出结果。