r - 如何在具有不同轴大小的 R 中绘图时激活“保持打开”？

Question

我想在 R 中的一个图中有两个不同的图。我执行以下编码：

x1 <- runif(190, 5.0, 7.5)
y1 <- runif(190, 6.0, 9.5)
# another set of numbers
x2 <- runif(200, 9, 11)
y2 <- runif(200, 9.0, 13.5)
# one more set
x3 <- c(16,16.2)
y3 <- c(21.5, 21.7)
# fourth set
x4 <- c(6,7.5, 8.5, 11, 12, 5, 5.5)
y4 <- c(11,13,13.5, 5, 14, 11, 4 )
#take all except x3, y3
x = c(x1,x2,  x4)
y = c(y1,y2,  y4)
# dataset
dt = data.frame(x,y)
#cluster into two
kr <- kmeans(dt, 2)
#plot
plot(dt[c("x", "y")], col = kr$cluster, ylim = range(c(3.5, 22)), frame= FALSE)
par(new=TRUE)
plot(x3,y3, col='blue', ylim = range(c(3.5, 22)))

但结果是这样的图像：

在 Matlab 中有 Hold On 功能，可以自动拟合绘图。R中有什么建议吗？谢谢

标签： rplot

Answer 1

要将点添加到 R 中的绘图，您可以执行以下操作：

plot(dt[c("x", "y")], col = kr$cluster, ylim = range(c(3.5, 22)), frame= FALSE)

points(x3,y3, col='blue')

您还可以添加行lines

您只需要调整xlim并ylim在第一个图中确保您添加的所有数据都适合，不会有任何自动调整大小。