首页 文章
  • 0 votes
     answers
     views

    字符串输入到dplyr group_by

    我需要了解如何在dplyr的group_by函数中输入字符串值(NSE) . 我的数据集和下面的代码适用于“group_by”,但不适用于“group_by_”版本 . 在这方面我无法找到我的错误 . ID,Region,Dimension,BlogsInd.,BlogsNews,BlogsTech,Columns 1,PK,Dim1,-4.75,NA,NA,NA 2,PK,Dim1,-5.69,...
  • 2 votes
     answers
     views

    在函数中使用dplyr group_by

    我试图在本地函数中使用dplyr的group_by,例如: testFunction <- function(df, x) { df %>% group_by(x) %>% summarize(mean.Petal.Width = mean(Petal.Width)) } testFunction(iris, Species) 我得到一个错误“...未知变量分组依据:x”...
  • 3 votes
     answers
     views

    dplyr使用变量列进行变异

    我正在尝试使用 mutate 创建一个包含基于特定列的值的新列 . 示例最终数据框(我正在尝试创建 new_col ): x = tibble(colA = c(11, 12, 13), colB = c(91, 92, 93), col_to_use = c("colA", "colA", "colB&...
  • 0 votes
     answers
     views

    data.table中的非标准评估

    我在 data.table 中对 by 的评价迷失了 . What will be correct way to merge functionality of LJ and LJ2 into one function? LJ <- function(dt_x_, dt_y_, by_) { merge( dt_x_, dt_y_, ...
  • 8 votes
     answers
     views

    使用传递给dplyr :: filter的参数创建一个函数,解决nse的最佳方法是什么?

    使用dplyr的动词时,非标准评估非常方便 . 但是当使用带有函数参数的动词时,它可能会有问题 . 例如,让我们说我想创建一个函数,它给出了给定物种的行数 . # Load packages and prepare data library(dplyr) library(lazyeval) # I prefer lowercase column names names(iris) <- to...
  • 3 votes
     answers
     views

    如何在函数中使用dplyr :: group_by

    我想创建一个函数,它将生成一个基于一个或多个分组变量计数的表 . 我发现这篇文章Using dplyr group_by in a function,如果我将函数传递给一个变量名,它就有效 library(dplyr) l <- c("a", "b", "c", "e", "f", &quot...
  • 1 votes
     answers
     views

    在dplyr :: mutate / transmute中混合常量和变量列名

    我正在尝试使用dplyr更改数据框列的类 . 目标列的名称包含在变量中 my_df<-data.frame(colour=c("red","blue","green"), val1=as.character(c(1,12,13)), val2=c(21,22,2...
  • 2 votes
     answers
     views

    存储在变量中的dplyr concat列(变异和非标准评估)

    我想基于变量 cols_to_concat 连接数据帧中的任意数量的列 df <- dplyr::data_frame(a = letters[1:3], b = letters[4:6], c = letters[7:9]) cols_to_concat = c("a", "b", "c") 要使用 cols_to_concat...
  • 1 votes
     answers
     views

    plyr功能和标准评估

    我想将plyr函数包装在我自己的函数中 . 我想向函数传递一个对象和一个应用cut函数的变量(unquoted) . x <- data.frame(time = seq(Sys.Date() - 99, Sys.Date(), 1)) dlply(x, .(week = cut(time, "1 week")), "[") f <- fun...

热门问题