r - 在 R 中绘制多组点

Question

我有多组要绘制的 xy 对。我希望每组 xy 对都由一条线连接。换句话说，目标是有多个实验实例，每个实例都由绘制在一个图上的一条线近似。另外，我将如何为线条着色？

plot 函数做我想要的，但需要一组 xy 对:plot(x, y, ...)
可以将此功能设为多组还是有其他功能？

Answer 1

要使用普通的绘图命令来做到这一点，我通常会创建一个绘图，然后使用 lines() 添加更多行。功能。

否则，您可以使用lattice 或ggplot2。这是一些数据:

df <- data.frame(a = runif(10), b = runif(10), c = runif(10), x = 1:10)

您可以使用 xyplot()从格子:

library(lattice)
xyplot(a + b + c ~ x, data = df, type = "l", auto.key=TRUE)

或 geom_line()在 ggplot2 中:

library(ggplot2)
ggplot(melt(df, id.vars="x"), aes(x, value, colour = variable,
        group = variable)) + geom_line() + theme_bw()

这是另一个示例，包括每对的点(来自 this post on the learnr blog ):

library(lattice)
dotplot(VADeaths, type = "o", auto.key = list(lines = TRUE,
     space = "right"), main = "Death Rates in Virginia - 1940",
     xlab = "Rate (per 1000)")

使用 ggplot2 绘制相同的图:

library(ggplot2)
p <- ggplot(melt(VADeaths), aes(value, X1, colour = X2,
             group = X2))
p + geom_point() + geom_line() + xlab("Rate (per 1000)") +
         ylab("") + opts(title = "Death Rates in Virginia - 1940")