使用现有的geom_line图例添加geom_vline图例

Question

当我已经有非常好的定义的geom_line图例时，添加我的geom_vline图例时遇到问题，我的代码如下：

g1=ggplot(M7, aes(x =CODT, y =TNA, group =Tre7))
g1=g1+geom_line(aes(color=Tre7, linetype=Tre7), size=0.8)
g1=g1+scale_color_manual(values=c("#7FCCE7", "#DC693F"), name  ="Groups", breaks=c("0", "1"),labels=c("Control", "Treated"))
g1=g1+scale_linetype_manual(values=c("solid", "dotdash"), name  ="Groups", breaks=c("0", "1"),labels=c("Control", "Treated"))
g1=g1+geom_vline(xintercept=122,linetype="solid", size=1, color="#9B9FA1")
g1=g1+labs(x="Time Period", y="Births by 1000 people")
g1=g1+ggtitle("Mean of Birth Rates for Treated and Control")+scale_x_continuous(breaks=c(0,24,48,72,96,120,144,168,192), labels=c(2000, 2002, 2004, 2006, 2008, 2010, 2012, 2014, 2016))+theme_economist_white()
g1

结果我得到：

如果CODT id时间段en Tre7是用于治疗和对照的虚拟变量，则TNA是这两组的BirthRates。

我的问题是，如何获得不干扰geom_line图例的带有标签“ 27F”的geom_vline图例？我已经尝试使用show.legend = TRUE和Show_guide = TRUE，但是没有任何效果。