Get the grouping variables
group_vars(x)
x
A grouped tidytable
df <- data.table( a = 1:3, b = 4:6, c = c("a", "a", "b"), d = c("a", "a", "b") ) df %>% group_by(c, d) %>% group_vars()