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 vote215 views1 answer
How to open link in same tab in chrome
CSS
1 vote206 views2 answers
Fit image in grid css
CSS
0 vote228 views1 answer
.sidebar { --offset: 2rem; flex-grow: 1; flex-basis: 300px; align-self: start; position: sticky; top: var(--offset); }
CSS
0 vote244 views1 answer
Div with specific id css
CSS
5 votes222 views2 answers
Css disabled div
CSS
2 votes217 views1 answer
Css rounded corners at top only
CSS
19 votes208 views6 answers
Map method
CSS
1 vote202 views1 answer
-ms css
CSS
3 votes219 views1 answer
Convert angular project from css to scss
CSS
-1 vote203 views1 answer
Most essential css elements
CSS