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 vote148 views1 answer
How to make text transparent with stroke in css
CSS
0 vote136 views2 answers
How to make an image not blurry when stretched css
CSS
0 vote127 views2 answers
Popular class name layouts
CSS
0 vote121 views1 answer
Display elements side by side css
CSS
53 votes134 views6 answers
Background color in css
CSS
0 vote124 views4 answers
Tabs css only
CSS
0 vote192 views1 answer
Remove focus blue lines from anchor tag
CSS
2 votes127 views2 answers
Css grid make all rows same height
CSS
0 vote140 views1 answer
Animation clip path
CSS
1 vote133 views1 answer
303,592 HDK to pounds
CSS