在ggplot2中绘制图例

时间:2018-07-14 03:05:07

标签: r ggplot2

我正在尝试在图表中绘制几件事。由ID着色的点,回归线,修改后的回归线以及我不希望其值落入的区域。
我想在图例中加上两行的名称。例如蓝色=拟合模型,红色=最坏情况和区域,红色=可疑值。

这是我用来创建图形的代码:

ggplot(data, aes(x=log_dilution, y=ct)) +
  geom_point(aes(color=ID),show.legend = FALSE) +
  geom_smooth(aes(linetype ='Fitted model +95%CI'), method = 'lm',show.legend = TRUE) +  
  geom_segment(aes(x = 0, xend = 1.7, y = model1$coefficients[1], yend 
      =model1$coefficients[1] + (model1$coefficients[2]+(1.96*1.030535))*1.7),
      color='red', lwd=1, lty=2,show.legend = FALSE) + 
  theme(axis.text.x= element_text(size=14), axis.title= element_text(size=16), axis.text.y = element_text(size=14)) +
  ylim(15, 40) + 
  annotate('rect',xmin=0, xmax=1.7, ymin=35, ymax=40, alpha=0.2, fill="red") + 
  scale_size_manual( values = c(1.5, 1.5), labels = c("Fitted model +95%CI", "Worst case")) + 
  guides(color=FALSE)+ylab("Ct")+theme(legend.position = "bottom")

这是到目前为止的结果。

enter image description here

有人可以给我一些指导,指导我如何绘制线条和区域的图例(我对绘制点不感兴趣)吗?

0 个答案:

没有答案