我正在使用ggline()中的ggpubr函数来创建具有均值和SD的折线图。
我想增加形状的厚度。在ggplot中通常通过geom_point(stroke=)完成，但不适用于ggline！
有人知道怎么做吗？
ggline(iris,x = "Species",y = "Sepal.Length",add = "mean_se",color = "Species",shape = 7,size = 1,point.size=3,palette = c("black","blue","red"),width=10,geom_point(stroke=1)
)
我想将正方形加粗：
您可能需要更新geom默认值。.真的看不到一种方法
首先要保留默认值，以便您可以从ggplot: How to set default color for all geoms?恢复默认值：
library(ggplot2)
library(purrr)
geom_aes_defaults <- function() {
geom_names <- apropos("^Geom",ignore.case = FALSE)
geoms <- mget(geom_names,env = asNamespace("ggplot2"))
map(geoms,~ .$default_aes)
}
old = geom_aes_defaults()$GeomPoint
现在为您的情节：
update_geom_defaults("point",list(stroke = 1.5))
ggline(iris,x = "Species",y = "Sepal.Length",add = "mean_se",color = "Species",shape = 7,size = 1,point.size=3,palette = c("black","blue","red"),width=10
)
我们将恢复默认设置：
update_geom_defaults("point",list(stroke = old$stroke))
# you can also do
#update_geom_defaults("point",list(stroke = 1))