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

2 votes346 views2 answers
Css width percentage
CSS
0 vote368 views1 answer
Typora rtl
CSS
0 vote380 views1 answer
How to call media query inside css class
CSS
0 vote359 views1 answer
Alinhar ao centro align item css
CSS
7 votes392 views3 answers
Stick menu bar in css
CSS
0 vote359 views3 answers
Remove cursor pointer css
CSS
1 vote374 views1 answer
Bottom css don't work for p
CSS
0 vote351 views1 answer
Css convert td to tr
CSS
0 vote374 views1 answer
Find element that is causing overflow css
CSS
1 vote378 views1 answer
Css line break width
CSS