如何在dplyr中停止使用rowwise？

Question

因此,如果希望在dplyr中逐行应用操作,可以使用该rowwise函数,例如:使用dplyr将函数应用于表的每一行？

是否有一个unrowwise函数可以用来逐行停止操作？目前,似乎group_by在rowwise删除行操作之后添加了一个,例如

data.frame(a=1:4) %>% rowwise() %>% group_by(a)
# ...
# Warning message:
# Grouping rowwise data frame strips rowwise nature 

group_by(1)如果您希望明确删除,这是否应该使用rowwise？

Answer 1

正如在评论和其他答案中找到的,正确的方法是使用ungroup().

操作rowwise(df)设置的类别之一df是rowwise_df.我们可以通过检查这里的代码来看到这个类的方法,它提供了以下ungroup方法:

#' @export
ungroup.rowwise_df <- function(x) {
  class(x) <- c( "tbl_df", "data.frame")
  x
}

所以我们看到ungroup并没有严格删除分组结构,而只是删除了rowwise_df从rowwise函数中添加的类.

Answer 2

只需使用 ungroup()

以下产生警告：

data.frame(a=1:4) %>% rowwise() %>% 
  group_by(a)
#Warning message:
#Grouping rowwise data frame strips rowwise nature

这不会产生警告：

data.frame(a=1:4) %>% rowwise() %>% 
  ungroup() %>% 
  group_by(a)

Answer 3

您可以使用as.data.frame()，如下所示

> data.frame(a=1:4) %>% rowwise() %>% group_by(a)
# A tibble: 4 x 1
# Groups:   a [4]
      a
* <int>
1     1
2     2
3     3
4     4
Warning message:
Grouping rowwise data frame strips rowwise nature 

> data.frame(a=1:4) %>% rowwise() %>% as.data.frame() %>% group_by(a)
# A tibble: 4 x 1
# Groups:   a [4]
      a
* <int>
1     1
2     2
3     3
4     4