如何添加代表红色和黑色组平均值的趋势线?我已经尝试过 geom_line()
和 geom_smooth()
,但没有让它工作。
这是我用来制作这张图的代码:
ggplot(data = long_data, aes(x = day, y = val, group = ID, colour = outcome)) +
geom_line(aes(color = as.factor(outcome), linetype = as.factor(outcome)), size = 0.7) +
scale_linetype_manual(values = c("longdash", "solid")) +
scale_color_manual(values = c("black", "red")) + theme_bw() +
theme(legend.position = "", panel.border = element_blank(), panel.grid.major = element_blank(),
panel.grid.minor = element_blank(), axis.line = element_line(colour = "black")) +
labs(x = "day", y = var, colour = "outcome ") +
xlim(0, 25) +
ggtitle(var) +
theme(plot.title = element_text(hjust = 0.5)) +
ylim(0,100)
答案 0 :(得分:1)
您的分组变量是 ID
,这就是 geom_smooth
将继承的。
尝试使用 outcome
geom_smooth(aes(group = outcome))