data %>% filter(Variables == "glucoset120") %>% ggplot(aes(x = Participant_ID, y = Values)) + geom_line() + facet_wrap(~Visit + Treatment, ncol = 2)
data %>% filter(Variables == "glucoset120") %>% ggplot(aes(x = Participant_ID, y = Values)) + geom_line() + facet_wrap(~Visit + Treatment, ncol = 2)