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

5 votes91 views1 answer
Bootstrap darkmode
CSS Bootstrap
72 votes97 views6 answers
Absolute position center
CSS
0 vote104 views4 answers
Select2 make previously selected options non deletable
CSS
4 votes109 views2 answers
CSS shrink image
CSS
1 vote125 views2 answers
Css all ids starting with
CSS
202 votes249 views6 answers
How to reference a css file in html
CSS
0 vote105 views1 answer
Inline-block column appear higher than others
CSS
8 votes91 views2 answers
How to rotate picture to the right in css
CSS
12 votes132 views3 answers
Line through in css
CSS
0 vote103 views1 answer
Css align backround image to the right
CSS