使用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

使用重塑包裝melt m：

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中的列。 這里的技巧是有一個表示你想要繪制的每一行的因子。