在一个图中绘制两个折线图时，在y轴上显示不同的比例

Question

我试图在一个图中绘制两个不同的图。但是，即使标记相同，y轴上的标记也是重叠的。这是我的数据 -

data file 1

data file 2

我使用了以下代码 -

plot(`2000_svm_movie`,type="o",col="blue",xlab="Training Years",ylab="Performances", axes=FALSE)
axis(1,at=seq(2000,2014,by=1),las=2)
axis(2,at=seq(78,82,by=1),las=1)
par(new = TRUE)
plot(`2000_random_movie`,type="o",col="red",xlab="Training Years",ylab="Performances", axes=FALSE)
axis(1,at=seq(2000,2014,by=1),las=2)
axis(2,at=seq(78,86,by=1),las=1)

我希望Y轴标记为（78,79,80,81,82,83,84,85,86）。我怎样才能做到这一点？

Answer 1

你必须添加你的数据，但到目前为止我知道你想要这样的东西吗？

plot(NULL, xlim=c(2007, 2014), ylim=c(78,86), xlab="Training Years", ylab="Performances")
axis(side=2, at=c(78:86), labels=c(78:86))


x1 <- c(2007:2014)
y1 <- runif(8,78,86)

lines(x1, y1, col="blue")
points(x1,y1, col="blue")

y2 <- runif(8,78,86)
lines(x1, y2, col="red")
points(x1,y2, col="red")