我正在尝试更改使用 ggpubr::lineplot . 我没有从函数Doc中找到任何参数来完成这项工作。如果有人能帮忙,请感激。
ggpubr::lineplot
library(ggpubr) ggline(ToothGrowth, x = "dose", y = "len", add = c("mean_se", "jitter"), size=2)
我也看不出怎么容易做到。但是,我们可以手动传递这些参数。首先,我们需要确定 layer 图中的对应点是那些抖动的点。我们可以做的事
layer
pp <- ggline(ToothGrowth, x = "dose", y = "len", add = c("mean_se", "jitter"), size = 2) idx <- which(sapply(pp$layers, function(l) "PositionJitter" %in% class(l$position)))
其余的是不言自明的:
pp$layers[[idx]]$aes_params$alpha <- 0.2 pp$layers[[idx]]$aes_params$size <- 3 pp
好的是,这种方法很容易归纳。