# Example factor vector
factor_vec <- factor(c('apple', 'banana', 'cherry', 'date', 'elderberry'))
# Define groups
groups <- list(
'Group1' = c('apple', 'banana'),
'Group2' = c('cherry', 'date')
)
# Collapse levels
ft_collapse_lev(factor_vec, groups)
Run the code above in your browser using DataLab