This commit is contained in:
2026-06-04 15:55:13 +08:00
parent 7aeb071fba
commit 028ef1c471
6 changed files with 1889 additions and 1 deletions
-1
View File
@@ -274,7 +274,6 @@ p4 <- datadf |>
dplyr::filter(pH > 5) |>
ggplot(aes(x = month, y = pH)) +
geom_boxplot(aes(fill = as.factor(month)), colour = "black", size = 0.8) +
scale_x_continuous(breaks = 1:12, labels = month.abb) +
theme(legend.position = "none")
(p1 | p2) / (p3 | p4) + patchwork::plot_annotation(tag_levels = "A")