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

28 votes166 views5 answers
Default cursor css
CSS
0 vote151 views1 answer
Selection Handler css
CSS
0 vote155 views1 answer
Css background half one color the other half another color
CSS
0 vote197 views1 answer
Bootstrap create full screen background image
CSS Bootstrap
0 vote108 views1 answer
Visited css
CSS
5 votes185 views2 answers
Css text cut dots
CSS
3 votes168 views1 answer
Install expo vector icons
CSS
0 vote161 views1 answer
Html same width as parent
CSS
0 vote176 views1 answer
How to set initial state after first time in formik
CSS
3 votes187 views1 answer
Get company id odoo
CSS