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

1 vote168 views2 answers
Css n number of lines only
CSS
1 vote158 views1 answer
Css font size important
CSS
9 votes158 views1 answer
Html static background
CSS
0 vote160 views1 answer
Chrome extension detect copy action
CSS
0 vote159 views1 answer
Css two classes in one element
CSS
0 vote152 views1 answer
How to increase height of input box in css
CSS
1 vote149 views2 answers
Css grid two columns
CSS
5 votes147 views2 answers
Overflow dots css
CSS
1 vote158 views1 answer
Cs and cd in jfet
CSS
62 votes143 views3 answers
Font awesome 4
CSS