【发布时间】:2015-11-11 14:20:31
【问题描述】:
【问题讨论】:
-
你能提供一个可重现的例子吗?
【问题讨论】:
library(ggplot2)
ggplot(mtcars, aes(wt, mpg)) +
geom_line() +
geom_segment(aes(x = 2, y = 0, xend = 2, yend = 25), linetype=2) +
geom_segment(aes(x = 0, y = 25, xend = 2, yend = 25), linetype=2) +
geom_point(data=data.frame(lat = c(25), long = c(2)),aes(long,lat),colour="blue",size=4) +
geom_segment(aes(x = 1, y = 0, xend = 1, yend = 20), linetype=2) +
geom_segment(aes(x = 0, y = 20, xend = 1, yend = 20), linetype=2) +
geom_point(data=data.frame(lat = c(20), long = c(1)),aes(long,lat),colour="blue",size=4)
您可以使用 geom_segment 和/或 geom_point。
查看here 了解如何更改轴标签/刻度。
编辑:为了第二点,我编辑了我的帖子。
【讨论】:
geom_segment。在这种情况下,您可以执行类似segment_data <- data.frame(x=c(2,0,1,0),y=c(0,25,0,20),xend=c(2,2,1,1), yend=c(25,25,20,20)) 然后b + geom_segment(data=segment_data, aes(x=x,xend=xend,y=y,yend=yend)) 的操作。