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 vote135 views1 answer
How can i make a menu bar appear by clicking an icon? in css?
CSS
0 vote175 views1 answer
Datatables when filtering snaps to top of page
CSS
1 vote139 views1 answer
Style direction
CSS
22 votes193 views6 answers
Box shadow css
CSS
13 votes155 views1 answer
Baclgroud image css
CSS
0 vote149 views2 answers
Background shrinks when responsive
CSS
0 vote204 views1 answer
DIVI Responsive menu breakpoints
CSS
3 votes150 views6 answers
Input disabled css
CSS
0 vote146 views1 answer
Absolute vertical middle quasar
CSS
1 vote141 views1 answer
Css remove whitespace around element
CSS