Question

我想要绘制多组xy对。我希望每组xy对都通过一条线连接起来。换句话说，目标是使多个实验实例各自通过在一个图上绘制的线来近似。另外，我将如何对线条进行不同的着色？

绘图功能可以实现我想要的功能，但需要一组xy对： plot(x, y, ...)

这个功能可以使用多个套件还是有另一个功能呢？

Answer 1

要使用普通的plot命令执行此操作，我通常会创建一个绘图，然后使用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)

ggplot2中的geom_line()：

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

在R中绘制多组点

1 个答案: