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"))