r - 在 R 中将列名称绘制为 x 轴

Question

我有以下数据框:

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 轴。理想情况下，我希望将它们作为单独的图表，但我现在找不到一种方法将它们放入一个图表中。

感谢任何帮助

Answer 1

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