R - 绘制两个系数时，如何不更改轴范围

Question

我的代码：

plot(factor(tData$Interval), tServiceLev, col = "red", type = "l", main = 

'Service Level and Call Volume', xlab = "Time Intervals", ylab = "Service Level")
lines(factor(tData$Interval), tServiceLev, type = "l", col = "blue",lwd = 2)
par(new=TRUE)
plot(factor(tData$Interval), tData$Offered, type = "l", axes=FALSE, col = "green")
axis(4)
mtext("Call Volume", 4,1.5)
lines(factor(tData$Interval), tData$Offered, col = "red", lwd=2)
legend("topright", col=c("blue","red"), lty = 1, legend = c("Service Level", "Call Volume"), cex = .85)

当我放上第二个图时，它会完全覆盖左轴。还有一种方法可以使实际图形更大，轴标签更接近轴范围值吗？

编辑：这是我编织rmd后的新图表。呼叫音量被切断。我希望时间间隔如图所示，但着色每个数据点不起作用。我想部分混淆是使用我以前从未使用过的因素数据。

Answer 1

在plot()来电中，您需要设置axes=FALSE。然后您可以随后使用axis()根据需要自定义轴（底部使用side=1，左轴使用side=2。）

对于其他调整，请尝试在plot之前调用dev.new(width=8, height=8)，例如，启动一个8英寸乘8英寸的设备。然后使用par(mai=c(2,2,1,1))，您可以在左下角设置2“边距，在顶部和右边设置1”。根据需要调整这些数字以获得适当的大小。

调用axis时，请使用axis(..., labels=FALSE)制作带刻度等的轴。然后使用mtext打印实际标签。 lines=..中的mtext选项可让您设置标签所绘制轴的距离。

更新：再次，您是否尝试过如上所述使用par(mai=c(bottom,left,top,right))为边距设置更多空间？对right使用较大的数字应该为轴标签提供更多空间。另外，尝试使用type='o'绘制制作者和线条。仍然没有理解你想对x轴做出的改变。