使用 qplot 绘制线条

Question

我想使用 ggplot2 包中的 qplot 在示例图上绘制多条线。 但我遇到了一些问题。

使用旧的绘图和线条函数我会做类似的事情

m<-cbind(1:4,5:8,-(5:8))
colnames(m)<-c("time","y1","y2")
m<-as.data.frame(m)
> m
  time y1 y2
1    1  5 -5
2    2  6 -6
3    3  7 -7
4    4  8 -8
plot(x=m$time,y=m$y1,type='l',ylim=range(m[,-1]))
lines(x=m$time,y=m$y2)

谢谢

Answer 1

使用reshape包到meltm:

library(reshape)
library(ggplot2)

m2 <- melt(m, id = "time")
p <- ggplot(m2, aes(x = time, y = value, color = variable))
p + geom_line() + ylab("y")

您可以根据自己的喜好重命名新 data.frame 中的列。这里的诀窍是有一个因子来表示您要绘制的每条线。