Pass argument to group_by

mytable <- function( x, group ) {
  x %>% 
    group_by( .data[[group]] ) %>% 
    summarise( n = n() )
}

group_string <- 'Species'

mytable( iris, group_string )

`summarise()` ungrouping output (override with `.groups` argument)
# A tibble: 3 x 2
  Species        n
  <fct>      <int>
1 setosa        50
2 versicolor    50
3 virginica     50

Source: stackoverflow.com

Similar codes

0 vote196 views1 answer
Veritical align inline-block checkbox element
CSS
3 votes191 views3 answers
Css overflow elipsis
CSS
1 vote193 views1 answer
Universal selector incss'
CSS
0 vote188 views2 answers
How to give text stroke in css
CSS
12 votes177 views4 answers
Padding in one line
CSS
5 votes198 views2 answers
No outline css
CSS
222 votes572 views6 answers
Bootstrap CSS CDN
CSS Bootstrap
1 vote187 views1 answer
-webkit css
CSS
69 votes189 views6 answers
Center image css
CSS
1 vote170 views1 answer
Login
CSS