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

0 vote424 views1 answer
Css pixel art
CSS
0 vote323 views1 answer
Morphism box shadow
CSS
5 votes319 views1 answer
How to create a shape in css
CSS
0 vote397 views1 answer
Css pause animation
CSS
6 votes348 views2 answers
Css grid full width row
CSS
4 votes346 views1 answer
Ionic mobile always dark theme in web
CSS
1 vote331 views1 answer
Scroll bottom css
CSS
2 votes377 views1 answer
New line in url
CSS
0 vote338 views2 answers
A4 pagw size css
CSS
5 votes382 views2 answers
Move to last commit
CSS