gpt4 book ai didi

r - 如何在 ggplot2 (R) 中定义误差线的宽度?

转载 作者:行者123 更新时间:2023-12-02 02:46:16 29 4
gpt4 key购买 nike

我有以下要绘制的数据。我正在尝试更改错误栏的宽度,但我遇到了一个错误,提示 Width not defined。设置 position_dodge(width = ?)。我试着做 position_dodge.. 但它没有帮助。有什么建议吗?

library(ggplot2)

time <- c("t1","t1","t1","t1","t1","t1","t2","t2","t2","t2","t2","t2")
species <- c(1,1,1,2,2,2,1,1,1,2,2,2)
value <- c(1,2,3,11,12,13,4,5,6,11,12,13)

df <- data.frame(time, species,value)
df$time <- as.factor(df$time)
df$species <- as.factor(df$species)

ggplot(df,aes(x=time, y=value, color = species, group = species)) + # Change fill to color
theme_bw() +
geom_point() +
stat_summary(fun.y=mean, position = "dodge") +
stat_summary(
geom="errorbar",
fun.data= mean_cl_boot,
width = 0.1, size = 0.2, col = "grey57") +
# Lines by species using grouping
stat_summary(aes(group = species), geom = "line", fun.y = mean) +
ylab("Fitness")

最佳答案

Position dodge 用于在数据点重叠时显示所有数据点,我不确定这在您的示例中是否有用,如果您的数据不重叠,您可能会发现仅删除此参数即可解决问题。保持不变可以解决问题:

pd<-position_dodge(0.5)
ggplot(df,aes(x=time, y=value, color = species, group = species)) + # Change fill to color
theme_bw() +
geom_point(position = pd) +
stat_summary(fun.y=mean, position = pd) +
stat_summary(
geom="errorbar",
fun.data= mean_cl_boot,
width = 0.1, size = 0.2, col = "grey57",
position = pd) +
# Lines by species using grouping
stat_summary(aes(group = species), geom = "line", fun.y = mean, position = pd) +
ylab("Fitness")

刚刚编辑以防止一切 split 。

关于r - 如何在 ggplot2 (R) 中定义误差线的宽度?,我们在Stack Overflow上找到一个类似的问题: https://stackoverflow.com/questions/54817836/

29 4 0
Copyright 2021 - 2024 cfsdn All Rights Reserved 蜀ICP备2022000587号
广告合作:1813099741@qq.com 6ren.com