我在mutate
中的行dplyr
出现了奇怪的错误。这是一个例子:
set.seed(1)
df <- data.frame(a = rnorm(5), b = rnorm(5))
df[2,'b'] <- NA
sum
没有问题,但摘要功能存在问题:
mutate(rowwise(df), sum(a, b, na.rm = T)) # works
mutate(rowwise(df), mean(a, b, na.rm = T))
#! Error: missing value where TRUE/FALSE needed
mutate(rowwise(df), median(a, b, na.rm = T))
#! Error: unused argument (-0.820468384118015)
现在,我们可以在第一栏中尝试NA
:
df <- data.frame(a = rnorm(5), b = rnorm(5))
df[2,'a'] <- NA
mutate(rowwise(df), sum(a, b, na.rm = T)) # works
mutate(rowwise(df), mean(a, b, na.rm = T))
#! no error, but returns `NaN`
mutate(rowwise(df), median(a, b, na.rm = T))
#! Error: unused argument (-0.820468384118015)
我不确定我在这里做错了什么。我认为预期的行为应该与:
相同as.data.frame(apply(df, 1, mean, na.rm = T)
谢谢!
答案 0 :(得分:5)
您的错误是您错误地调用了mean
和median
。
虽然sum
可以接受任意数量的参数并且只是将它们全部添加,mean
和median
只接受一个x
参数来取平均值/中位数
就像a
和b
是向量而你想要使用mean(c(a, b))
而不是mean(a,b)
的组合向量的平均值,你在这里做同样的事情:
mutate(rowwise(df), mean=mean(c(a, b), na.rm = T), med=median(c(a, b), na.rm=T))
(旁注:你这里一次只计算2个值的均值和中位数,所以平均值等于中位数...)