R：在刻度线之间绘制y轴网格线

Question

我可以使用网格线绘制图表：

df <-data.frame(x=c(1:100),y=runif(100))
plot(df$x,df$y,type="o")
grid (lty = 6,col = "grey")

但是如何在y轴刻度线之间添加额外的y网格线？ 谢谢您的帮助。

Answer 1

我认为这应该是正常的，与您放入的y轴无关。

df <-data.frame(x=c(1:100),y=runif(100))
par(lab=c())
plot(df$x,df$y,type="o")

#first draw X gridlines
grid (nx = NULL, ny = NA, lty = 6,col = "grey")

#then draw y gridlines with abline 
Yticks <- axTicks(2)
doublegrid <- c(seq(min(Yticks), max(Yticks), by=(max(Yticks)-min(Yticks))/((length(Yticks)-1)*2)))
abline(h=doublegrid, lty = 6,col = "grey")

Answer 2

按'y轴刻度'，是指那些带数字的标记？如果是的话，

df <-data.frame(x=c(1:100),y=runif(100))
plot(df$x,df$y,type="o")    
grid(lty = 6,col = "grey", nx=NULL, ny=NULL)

否则，

abline(h=0.1*0:36, col="gray")

就足够了吗？