軸格式和網格線

Question

我有一個數據組，如以下之一：

data<-data.frame(x=c(50,100,250,400),y1=c(0.74,0.75,0.82,0.79),y2=c(0.81,0.83,0.87,0.88)) 

我生成這樣的劇情：

plot(data$x,data$y1,type='l',col="red",xaxs='i',yaxs='i',ylim=c(0.4,1),xlim=c(50,500)) 
lines(data$x, data$y2, type='l',col="blue") 

所生成的數字是：

如何在此圖上進行以下修改？

• 1）當前X軸以50開始，但它不明確標記50。

• 2）當前X軸被標記爲100, 200, 300, 400, 500，我可以將它標記爲50,100, 250,500？

• 3）當前Y軸標記爲0.5, 0.6,0.7.0.8,0.9,1.0。我可以將其標記爲0.5, 0.55, 0.6, 0.65, 0.7,0.75, 0.8, 0.85, 0.9, 0.95, 1？

• 4）我想添加一些網格線平行於X軸。這些線應沿着Y軸開始於0.5, 0.55, 0.6, 0.65, 0.7,0.75, 0.8, 0.85, 0.9, 0.95, 1點。

Answer 1

data<-data.frame(x=c(50,100,250,400),y1=c(0.74,0.75,0.82,0.79),y2=c(0.81,0.83,0.87,0.88)) 

windows() 
plot(data$x,data$y1,type="l",col="red", ylim=c(0.5,1),xlim= c(50,500),col.axis = "white") 
axis(1, xaxp=c(50,500,9)) 
axis(2, yaxp=c(0.5,1,10)) 
lines(data$x, data$y2, type='l',col="blue") 

for(i in c(0.55,0.6,0.65,0.7,0.75,0.8,0.85,0.9,0.95)) { 
lines(c(50,500),c(i,i),type="l",lty=2,lwd=0.5, col="black") 
rm(i) 
}