r - 为 R 中的一个数据集绘制具有不同比例的轴

Question

我有一个大数据集，我在 R 中绘制，我希望图表的每一侧都有一个轴以两种不同的比例显示数据。因此，例如，在左侧垂直轴上，我想直接绘制数据(例如 plot(y ~ x) )，在右侧轴上，我想对左侧轴进行线性缩放。 (例如绘图(y * 20 ~ x)。

所以只会显示一个数据集，但轴会显示这些数据点的不同含义。

我尝试了以下方法:

plot(x = dataset$x, y = dataset$y)
axis(4, pretty(dataset$y,10) )

这将正确打印与默认左轴具有相同比例的新右轴。 (基本上没用，但它有效)但是，如果我做这个微小的改变:

plot(x = dataset$x, y = dataset$y)
axis(4, pretty(10*dataset$y,10) )

突然，它拒绝添加我的新右轴。我怀疑这与 R 查看轴是否以某种方式与数据集匹配，如果不匹配则拒绝它。如何让 R 忽略数据集并只打印我选择的任意轴？

Answer 1

你要求的并不总是正确的做法，但你可以通过 par(new=TRUE) 强制它:

x <- 1:20
plot(x, log(x), type='l') 
par(new=TRUE)              # key: ask for new plot without erasing old
plot(x, sqrt(x), type='l', col='red', xlab="", yaxt="n")
axis(4)

x 轴绘制了两次，但由于您具有相同的 x 坐标，这不是问题。第二个 y 轴被抑制并绘制在右侧。但是标签显示您现在正在混合到不同的级别。