我有一个data.frame df,其列T
,V1
,V2
,V3
,V4
我想制作一个包含两个图的ggplot,T
作为x轴的公共图
第一个图包含V1
第二个图包含V2
,V3
,V4
我试过了:
m1 <- melt(df, id = "T")
chart1<-qplot(T, value, data = m1, geom = "line", group = variable) +
stat_smooth() +
facet_grid(variable ~ ., scale = "free_y")
但这给了我四个共同的情节,而我只想要两个。 有没有办法做到这一点?
答案 0 :(得分:4)
library(ggplot2)
library("reshape")
df <- data.frame(T,V1,V2,V3,V4)
m1 <- melt(df, id = "T")
m1$sepfac <- (m1$variable=="V1")
chart1<-qplot(T, value, data = m1, geom = "line", group = variable) +
stat_smooth() +
facet_grid(sepfac~., scale = "free_y")