限制R中的abline的X軸跨度

Question

關於我的問題here，我有一個圖，xlim就是c(0,1000)。如何可以限制每個從

abline(h=seq(0,45,5),col="white") 

所得到的寬度爲0至沿x軸500上的線，同時保持情節的的c(0,1000)xlim？

Answer 1

你可以利用?lines。

plot(1:100) 
sapply(seq(1,100,5), function(i) lines(c(0,50), c(i,i)))