study |>
tidyplot(x = treatment, y = score, color = treatment) |>
add_data_points_beeswarm() |>
add_mean_bar(alpha = 0.4) |>
adjust_theme_details(plot.background = ggplot2::element_rect(fill = "#FFEBFF"))
Run the code above in your browser using DataLab