这里有一个代表性的例子：
DF <- as.data.frame(matrix(data = 0, nrow = 9, ncol = 3))
colnames(DF) <- c("code", "actual", "expected")
DF$code <- letters[rep(1:3, each = 3)]
DF$actual <- runif(9, 3,5)
DF$expected <- rep(1:3, each = 3)
以下崩溃：
DF %>%
group_by(code) %>%
summarise(Exp = expected)
Error: expecting a single value
然而，以下作品：
DF %>%
group_by(code) %>%
summarise(Exp = unique(expected))
但是，代码的唯一值只是一个值。为什么返回值不起作用？为什么我需要将其包装在“唯一”中？
谢谢！
这是一个常见的错误。调试它的一种方法是在摘要调用中使用粘贴（）。
> DF %>%
group_by(code) %>%
summarise(Exp=paste(expected, collapse='-'))
Source: local data frame [3 x 2]
code Exp
(chr) (chr)
1 a 1-1-1
2 b 2-2-2
3 c 3-3-3
你看到发生了什么吗？您正在尝试为单个组分配多个值。
一种解决方案是使用所描述的唯一。或者，如果您知道具有相同代码的所有行始终具有相同的期望值，则可以直接group_by：
> DF%>% group_by(code, expected) %>% summarise()
Source: local data frame [3 x 2]
Groups: code [?]
code expected
(chr) (int)
1 a 1
2 b 2
3 c 3
如果数据帧很大，group_by将比基于唯一（）的解决方案快得多
