# NOT RUN {
library(magrittr)
file <- system.file(package = 'yamlet', 'extdata','quinidine.csv')
x <- decorate(file)
x %>% resolve %>% decorations(Age, glyco, Race)
x %>% resolve(glyco, Race) %>% desolve %>% decorations(Age, glyco, Race)
# }
Run the code above in your browser using DataLab