在dplyr中将列名称作为变量传递

Question

这个问题的变种已被问过很多，我也读过NSE。 我仍然无法理解这一点。

这很简单：

<AddToCartRow item={this.props.data.sizes} option='size' key={this.state.cartKey}/>

现在我想使用变量x将dist列传递给

library(dplyr) data(cars) cars %>% group_by(speed) %>% summarise(d = mean(dist))

当然这不起作用：

x <- "dist"

所以我使用SE版本总结：

cars %>%
  group_by(speed) %>%
  summarise(d = mean(x))

好的，不起作用，所以我还要添加cars %>% group_by(speed) %>% summarise_(d = mean(x)) ：

~

仍然不起作用，但如果使用cars %>% group_by(speed) %>% summarise_(d = ~mean(x)) 而不是dist：

x

这有效，但不使用x。

cars %>%
  group_by(speed) %>%
  summarise_(d = ~mean(dist))

这也不起作用。

我基本上在不知道如何做这项工作，或者为什么失败了。

Answer 1

cars %>%
    group_by(speed) %>%
    summarise_each_(funs(mean), vars(matches(x)))