Question

我有问题让tidyr的聚会工作在它的标准评估版本gather_：

require(tidyr)
require(dplyr)
require(lazyeval)

df = data.frame(varName=c(1,2))

收集作品：

df %>% gather(variable,value,varName)

但是我希望能够在标准评估模式下从变量中获取名称varName，并且似乎无法正确使用：

name='varName'
df %>% gather_("variable","value",interp(~v,v=name))
Error in match(x, y, 0L) : 'match' requires vector arguments

我也对以下内容感到困惑。

这可以按预期工作：

df %>% gather_("variable","value","varName")

下一行应该等同于最后一行（根据我对http://cran.r-project.org/web/packages/dplyr/vignettes/nse.html的理解），但不起作用：

df %>% gather_(~variable,~value,~varName)
Error in match(x, y, 0L) : 'match' requires vector arguments

Answer 1

查看tidyr:::gather_.data.frame的来源，您可以看到它只是reshape2::melt的包装器。因此，它仅适用于character或numeric个参数。实际上以下（我认为是一个错误）有效：

df %>% gather_("variable", "value", 1)

据我所知，nse小插图仅指dplyr而不指tidyr。

Answer 2

虽然这个问题已得到解答，但以下代码可用于定义键和值，以便在函数中更常用地使用键和值的输入向量进行收集：

    data <- data.frame(a = runif(10), b = runif(10), c = runif(10))
    Key <- "ColId"
    Value <- "ColValue"

    data %>% gather(key = KeyTmp, value = ValTmp) %>% 
    rename_(.dots = setNames("KeyTmp", Key) ) %>% 
    rename_(.dots = setNames("ValTmp", Value) )

gather_不起作用。在标准评估模式中，不应该引用和引用具有相同的效果吗？

我有问题让tidyr的聚会工作在它的标准评估版本gather_：

2 个答案: