我正在尝试更改使用ggpubr::lineplot
. 我没有从函数文档中找到任何参数来完成这项工作。感谢是否有人可以提供帮助。
library(ggpubr)
ggline(ToothGrowth, x = "dose", y = "len",
add = c("mean_se", "jitter"),
size=2)
您可以使用以下参数轻松完成此操作add.params
:
例如:
ggline(ToothGrowth, x = "dose", y = "len",
add = c("mean_se", "jitter"),
size=2, add.params = list(size = 3, alpha = 0.2))
我也看不出它是如何轻松完成的。但是,我们可以手动传递这些参数。首先,我们需要确定哪些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
一件好事是这种方法很容易推广。