我有以下数据框:
rs = data.frame(c("A1","A2","A3","A4","A5"), runif(5), runif(5), runif(5))
names(rs)=c("column", 2007,2008,2009)
rownames(rs) <- rs$column
rs <- rs[2:4]
2007 2008 2009
A1 0.95786606 0.71139657 0.05623083
A2 0.22712574 0.84925031 0.80634618
A3 0.25313536 0.08571401 0.10015232
A4 0.03830769 0.23901711 0.73613390
A5 0.85697714 0.38597167 0.25826570
我想创建一个绘图,为数据框中的每一行绘制5条线,例如第1行对应于A1,绘制了三个点(2007,0.95686606),(2008,0.71139657),(2009,0.05623083),第2行对应于A2,即点(2007,0.22712574)等。将成为x轴,而点将成为y轴。理想情况下,我希望将它们作为单独的图,但是现在找不到一种将它们放入一个图的方法。
任何帮助表示赞赏
答案 0 :(得分:2)
rs <- as.data.frame(t(rs))
rs$year <- rownames(rs)
rs <- melt(rs, id.vars=c("year"))
ggplot(rs, aes(x=as.numeric(year), y=value, color=variable)) + geom_line()
对于每页多个图,有许多解决方案。
简单的示例:
http://theanalysisfactor.com/r-multiple-graphs
更好的例子:
http://cran.r-project.org/web/packages/egg/vignettes/Ecosystem.html