dplyr:带有NA的rowwise mutate错误

时间:2015-07-13 05:19:45

标签: r dplyr na

我在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)

谢谢!

1 个答案:

答案 0 :(得分:5)

您的错误是您错误地调用了meanmedian

虽然sum可以接受任意数量的参数并且只是将它们全部添加,meanmedian只接受一个x参数来取平均值/中位数

就像ab是向量而你想要使用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个值的均值和中位数,所以平均值等于中位数...)