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 vote189 views1 answer
Horizontal checkbox css
CSS
0 vote195 views1 answer
Checkbox before stretching with css
CSS
1 vote193 views1 answer
Css > symbol
CSS
49 votes264 views5 answers
How to remove bullets from ul
CSS
0 vote188 views1 answer
Lier class et css
CSS
0 vote221 views1 answer
Javascript typewriter effect left to right
CSS
1 vote200 views1 answer
Apply css if class not present
CSS
2 votes195 views6 answers
Tailwindcss
CSS
0 vote184 views1 answer
Body css margin, background, font-family, hei
CSS
6 votes203 views2 answers
How to give opacity to border
CSS