在 R 中的同一图中绘制多个图形和线条

R 中可以使用 par 函数来实现在同一图中绘制多个图形和线条。

par(mfrow=c(nrows, ncols))

其中，nrows 和 ncols 分别是图区矩阵的行数和列数。

接下来，就可以画多个图形了。在同一图中绘制多个线条时，可以使用 lines 函数。在同一图中绘制多个点时，可以使用 points 函数。在同一图中绘制多个直方图时，可以使用 hist 函数。在同一图中绘制多个散点图时，可以使用 plot 函数。

下面是一个示例：

# 生成数据
x <- rnorm(100)
y <- rpois(100, lambda=2)

# 绘制散点图
plot(x, y, main="Scatterplot", xlab="X", ylab="Y")

# 添加一条线条
abline(h=mean(y), col="red")

# 绘制第二个图形
hist(x, breaks=20, main="Histogram")

# 绘制第三个图形
plot(density(x), main="Density Plot")

在这个例子中，我们首先生成了两个随机向量 x 和 y，然后使用 plot 函数绘制了一个散点图，并添加了一条平均值为红色的线条。接着，使用两次 plot 函数分别绘制了第二个图形（直方图）和第三个图形（密度图）。在执行这个代码块后，会生成一个包含三个图形的图区。

上面的代码中使用的 par 函数设置了图区矩阵的行数和列数。我们可以自由地调整这两个参数以适应实际需求。