r - 将 lines() 应用于数据框/矩阵的列；每条线都有不同的颜色

Question

我正在尝试提出一个不涉及使用其他软件包（例如 ggplot）的解决方案。虽然绘制多条线非常简单，但我还没有想出一种方法来将参数的不同值（例如，不同的颜色）应用于不同的线。下面的代码（带有结果图）是我的尝试，显然没有做我想做的事情。我也不想使用循环，因为我试图让我的脚本尽可能简单。

df = cbind(sort(rnorm(10)), sort(rnorm(10,-2)), sort(rlnorm(10)))
plot(0, xlim = c(1,10), ylim=range(df), type="n")
apply(df, 2, lines, type="b", col = c("red", "blue", "black"))

我真正想要的是如下图：

plot(0, xlim = c(1,10), ylim=range(df), type="n")
color = c("red","blue","black")
for(i in 1:3){
    lines(1:10, df[,i], type = "b", col=color[i])
}

先感谢您！

Answer 1

尝试matplot()：

df <- cbind(sort(rnorm(10)), sort(rnorm(10,-2)), sort(rlnorm(10)))
matplot(df, type="b", lty=1, pch=1, col=c("blue", "red", "black"))