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 views1 answer
Div nebeneinander
CSS
0 vote198 views1 answer
Remove glow textarea css
CSS
17 votes198 views3 answers
Text orientation css
CSS
1 vote185 views1 answer
Span nowrap
CSS
34 votes197 views2 answers
Center a class css
CSS
0 vote184 views1 answer
Bash list all npm processes
CSS
21 votes193 views5 answers
How to open a file in vscode from terminal
CSS
6 votes262 views3 answers
Skeleton css cdn
CSS Skeleton
3 votes230 views2 answers
How to make image not draggable in html
CSS
2 votes179 views1 answer
Add image ::before css
CSS