Question

跟进上一个问题（link）后，在使用管道和dplyr时，分组数据似乎不会改变比例。以下是一些示例代码，稍微改变了链接问题。

set.seed(123)
n = 1000
df <- data.frame(ID = sample(c("A","B","C","D","E"), size=n, replace=TRUE),
                 score = runif(n, 0, 10))

scaledByID <- 
        df %>%
        group_by(ID) %>%
        mutate(scaledScore = scale(score))

notScaledByID <- 
        df %>%
        mutate(scaledScore = scale(score))

mean(scaledByID$scaledScore == notScaledByID$scaledScore)
#[1] 1

packageVersion("dplyr")
#[1] ‘0.7.4’

scaledByID和notScaledbyID的值相同，这让我相信它不是按ID缩放。有什么建议吗？

编辑以添加R和RStudio的版本：

RStudio.Version()$version
#[1] ‘1.2.91’

R.version.string
#[1] "R version 3.4.2 (2017-09-28)"

Answer 1

问题似乎是RStudio版本1.2.91的错误。我降级为稳定版本（版本1.1.383），mean(scaledByID$scaledScore == notScaledByID$scale)的新输出为0。

对于两者（3.4.2），R的版本是相同的。

使用dplyr按R在组中进行缩放：分组和非分组似乎生成相同的结果

1 个答案: