我试图用一些垂直线作为特定时间点的指示器来显示一个线图,并有一个标记这些时间点的图例。
根据书“ggplot2”第6.4.4节中的示例,我尝试了以下方法
huron<-data.frame(year=1875:1972,level=LakeHuron)
vertDf<-data.frame(years=c(1900,1925,1950),labels=c("A","B","C"))
pltWithLines<-ggplot(huron, aes (x=year,y=level)) +
geom_line() +
geom_vline(aes(xintercept=years,color=labels),data=vertDf) +
scale_color_manual("Sample Year",
values=c("A"="blue","B"="red","C"="green"))
这会产生一个具有正确颜色的垂直线的图形,但根本没有图例。
这是怎么回事?
发布于 2015-03-05 11:14:39
你需要show_guide
ggplot(huron, aes (x=year,y=level)) +
geom_line() +
geom_vline(aes(xintercept=years, color=labels),data=vertDf, show_guide=T) +
scale_color_manual("Sample Year",
values=c("A"="blue","B"="red","C"="green"))
https://stackoverflow.com/questions/28885769
复制相似问题