R图，控制轴高度或限制答案

【问题标题】：R plot, control axis height or limitR图，控制轴高度或限制
【发布时间】：2015-04-16 09:51:39
【问题描述】：

我正在使用 par(mfrow = c(2,1)) 绘制两个赌注图。在下图中，我删除了默认轴并添加了自己的轴（这是一个更复杂的图的虚拟示例，我需要在其中执行此操作）。

问题是我添加的轴上升到下图框的上限，与上图轴的数字重叠。

因此，我需要限制下部绘图轴的高度，以免重叠。

这里有一些虚拟代码，希望能重现效果：

serie1 <- c(45, 257, 25, 55, 89, 297, 471, 1256, 312, 969, 788, 425, NaN, 77, 43, 38, 20, 6, 16, 13, 11, 6, 7, 2, 0, 31, 4, 3, 2, 2, 3, 4, 10, 16, 200, NaN)
serie2 <- c(1106, 1654, 578, 1354, 536, 2384, 586, 1356, 1457, 1508, 4567, 4501, 4037, 7735, 6118, 2775, 1196, 916, 551, 991, 109, 174, 278, 100, 98, 124, 122, 138, 256, 226, 445, 638, 511, 465, 1733, 1278)

opar <- par(mfrow = c(2,1))

par(mar = c(0,4,4,2))
plot.ts(serie1, col = 'red', lwd = 3, xaxt= 'n', xlab='')

par(mar = c(5,4,0,2))
plot.ts(serie2, col = 'blue', lwd = 3, xaxt = 'n', yaxt = 'n', ylab = '', xlab = '')

axis(2)
mtext(side = 2, line = 3, 'serie2')

par(opar)

【问题讨论】：

您只是在寻找基本 R 答案还是包括其他软件包的答案？

标签： r plot

【解决方案1】：

您可以使用at（和labels）参数对axis() 进行微调轴标签。将您的行 axis(2) 替换为：

axis(2,at=(0:3)*2000)

查看?axis 以查看您的选择。

或者，您可以在绘图之间留出一些空间，即更改您的 par(mar=...) 命令。

【讨论】：