r - 仅在一侧的图边距外绘制 abline

Question

我正在处理一个 R 图，该图将被我用 abline() 创建的垂直线分成两部分.我希望那个abline只在一侧越过我的情节边界。

我找到了 this关于设置的有用帖子 par(xpd=) .但是，我无法弄清楚如何使用此命令使线条仅在一侧越过绘图边框，如下面的屏幕截图所示。

有没有办法在基础 R 中做到这一点？ (或者我必须重建
ggplot 等中的全部内容？)

我觉得关键可能是figure region之间的差异,device region等，但无法真正确定差异
那些之间。我看着这个
source
但至少对于我的情节，这些设置似乎是一样的
事情 - 如果有人在这里也有帮助，那就太酷了!

这是我的方法:

plot(100, 100)
par(xpd=TRUE)
abline(v=70, lty=3)

我得到/想要的:



任何帮助表示赞赏!

Answer 1

使用 lines .设置限制 y如你所愿。

plot(100, 100)
par(xpd = TRUE)
lines(x = c(70,70), y = c(45, par('usr')[4]), lty = 2)
# par('usr') gives the 4 extremes of plot
# par('usr')[4] gives the extreme on top

另一种选择是不要乱用 xpd并使用 axis反而。使用 tck定义超出情节的线的长度。 tck = -0.25意味着长度是朝向底部的地块高度的四分之一。

plot(100, 100)
par(xpd = FALSE) #Only because we made TRUE above 
abline(v = 70, lty = 2)
axis(1, at = 70, labels = NA, tck = -0.25, lty = 2)