Use rle to group by runs when using dplyr

by

One option seems to be the use of {} as in:

dat %>%
    group_by(yy = {yy = rle(x); rep(seq_along(yy$lengths), yy$lengths)}) %>%
    summarize(mean(y))
#Source: local data frame [4 x 2]
#
#     yy mean(y)
#  (int)   (dbl)
#1     1     2.0
#2     2     4.5
#3     3     6.0
#4     4     7.0

It would be nice if future dplyr versions also had an equivalent of data.table’s rleid function.

I noticed that this problem occurs when using a data.frame or tbl_df input but not, when using a tbl_dt or data.table input:

dat %>% 
    tbl_df %>% 
    group_by(yy = with(rle(x), rep(seq_along(lengths), lengths))) %>%
    summarize(mean(y))
Error: cannot coerce type 'closure' to vector of type 'integer'

dat %>% 
    tbl_dt %>% 
    group_by(yy = with(rle(x), rep(seq_along(lengths), lengths))) %>%
    summarize(mean(y))
Source: local data table [4 x 2]

     yy mean(y)
  (int)   (dbl)
1     1     2.0
2     2     4.5
3     3     6.0
4     4     7.0

I reported this as an issue on dplyr’s github page.

More Related Contents:

  1. Is there a dplyr equivalent to data.table::rleid?
  2. Summarizing multiple columns with dplyr? [duplicate]
  3. Relative frequencies / proportions with dplyr
  4. Create counter within consecutive runs of values
  5. Unique rows, considering two columns, in R, without order
  6. standard evaluation in dplyr: summarise a variable given as a character string
  7. Use variable names in functions of dplyr
  8. Create new variables with mutate_at while keeping the original ones
  9. How to interpret dplyr message `summarise()` regrouping output by ‘x’ (override with `.groups` argument)?
  10. Finding percentage in a sub-group using group_by and summarise
  11. Make a group_indices based on several columns
  12. Using spread with duplicate identifiers for rows
  13. filter for complete cases in data.frame using dplyr (case-wise deletion)
  14. dplyr filter with condition on multiple columns
  15. dplyr – using column names as function arguments
  16. Fill missing dates by group
  17. dplyr – filter by group size
  18. dplyr::group_by_ with character string input of several variable names
  19. How to parametrize function calls in dplyr 0.7?
  20. filter function in dplyr errors: object ‘name’ not found
  21. Create a ranking variable with dplyr?
  22. How to pass dynamic column names in dplyr into custom function?
  23. R – Group by variable and then assign a unique ID [duplicate]
  24. R sum a variable by two groups [duplicate]
  25. Join two data frames in R based on closest timestamp
  26. data.table row-wise sum, mean, min, max like dplyr?
  27. Update/Replace Values in Dataframe with Tidyverse Join
  28. How to pass column name as argument to function for dplyr verbs?
  29. How to use data.table within functions and loops?
  30. Override column types when importing data using readr::read_csv() when there are many columns

Leave a Comment