library(magrittr)
file <- system.file(package = 'yamlet', 'extdata','quinidine.csv')
x <- decorate(file)
# this is how Age, glyco, Race look when resolved
x %>% resolve %>% decorations(Age, glyco, Race)
# we can resolve two of them and then 'unresolve' all of them
x %>% resolve(glyco, Race) %>% desolve %>% decorations(Age, glyco, Race)
Run the code above in your browser using DataLab