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

22 votes357 views4 answers
Grid center align
CSS
13 votes434 views5 answers
Transition shorthand
CSS
1 vote328 views2 answers
Align div to right side of parent
CSS
7 votes344 views2 answers
Disable bullets in ul
CSS
2 votes394 views1 answer
Css set property with data attribute
CSS
6 votes382 views3 answers
How to add a background overlay in css
CSS
0 vote433 views1 answer
Css pixel art
CSS
4 votes355 views1 answer
Flexbox center and space between
CSS
13 votes344 views2 answers
How to middle text css
CSS
0 vote339 views2 answers
How to hide youtube watermark from embedded video :2021
CSS