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

3 votes208 views3 answers
Css border-left
CSS
7 votes219 views3 answers
Stick menu bar in css
CSS
0 vote188 views1 answer
How to some of the list and show some in css
CSS
2 votes204 views2 answers
How to center a inline block element
CSS
1 vote273 views1 answer
Twig block
CSS
39 votes191 views4 answers
Font awesome size
CSS
4 votes212 views2 answers
Html css rounded corners with mark
CSS
0 vote186 views1 answer
How to make a width infinite and hidden using css
CSS
-1 vote177 views2 answers
Bootstrap 4 popover content from div
CSS
1 vote203 views2 answers
Styles only for IE
CSS