0

我有一个类似以下的数据集:

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轴的网格线。这些线应该从0.5, 0.55, 0.6, 0.65, 0.7,0.75, 0.8, 0.85, 0.9, 0.95, 1沿 Y 轴的点开始。

4

1 回答 1

4
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)
}

在此处输入图像描述

于 2013-04-14T00:39:25.503 回答