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

1 vote113 views1 answer
Li only showing first bullet
CSS
6 votes124 views1 answer
Responsive image in css
CSS
68 votes139 views6 answers
Add css file in html
CSS
0 vote119 views1 answer
Pill shape css
CSS
51 votes110 views6 answers
Text overflow ellipsis css
CSS
1 vote106 views2 answers
Fixed within the div css
CSS
0 vote135 views1 answer
Text stock css
CSS
1 vote110 views1 answer
How to validate mail adress css
CSS
0 vote124 views1 answer
Materialisecss
CSS
0 vote135 views1 answer
Css percentrage minus px
CSS