# Paired data points
study %>%
tidyplot(x = treatment, y = score, color = group) %>%
reorder_x_axis_labels("A", "C", "B", "D") %>%
add_data_points() %>%
add_line(group = participant, color = "grey")
study %>%
tidyplot(x = treatment, y = score) %>%
reorder_x_axis_labels("A", "C", "B", "D") %>%
add_data_points() %>%
add_area(group = participant)
Run the code above in your browser using DataLab