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 vote205 views1 answer
Enque script only on specific archive page
CSS
2 votes175 views1 answer
Css rounded corners at top only
CSS
0 vote201 views1 answer
Label for centered image
CSS
19 votes177 views3 answers
Css border radius top
CSS
18 votes164 views4 answers
Grayscale css
CSS
28 votes174 views3 answers
Google font roboto
CSS
0 vote178 views1 answer
The CSS to make all the columns equal in width is as follows
CSS
0 vote166 views1 answer
Javascript typewriter effect left to right
CSS
1 vote160 views1 answer
Html minimum width
CSS
0 vote163 views1 answer
Css design guideline
CSS