如何使用 dplyr 进行编程答案

【问题标题】：How to use dplyr for programming如何使用 dplyr 进行编程
【发布时间】：2014-02-23 15:33:08
【问题描述】：

我喜欢dplyr 用于数据操作，但我不明白如何使用它进行编程。例如，要重新调整一些变量，我们可以这样做：

mutate(cars, speed.scaled = scale(speed), dist.scaled = scale(dist))

非常酷。但现在假设我想编写一个函数，使用mutate 来缩放数据框中的所有变量。如何创建 ... 参数？我能想到的最好的事情是：

fnargs <- lapply(names(cars), function(x){call("scale", as.name(x))})
names(fnargs) <- paste0(names(cars), ".scaled")
do.call(mutate, c(.data=as.name("cars"), fnargs))

或者是否有其他更易于编程的界面？

【问题讨论】：

见stackoverflow.com/questions/21295936
我们会到达那里：github.com/hadley/dplyr/issues/178

标签： r cran dplyr

【解决方案1】：

简单易懂：使用mutate_each(cars, funs(scale)) 或apply(cars, 2, scale)。

【讨论】：

【解决方案2】：

这可以像这样在基础 R 中完成：

cars.scaled <- as.data.frame(scale(cars))

或

cars.scaled <- replace(cars, TRUE, lapply(cars, scale))

或

cars.scaled <- cars
cars.scaled[] <- lapply(cars, scale)

上面的第一个可以翻译成%>%，如下所示：

cars.scaled <- cars %>% scale %>% as.data.frame

【讨论】：