r - 从 data.frame 创建条形图

Question

在 RI 中有一个 data.frame，就像图片顶部的那个。

是否有可能创建如下所示的条形图？

数据框：

      X1   X2   X3  
 --- ---- ---- ---- 
  A    2   3    4   
  B    4   2    1   
  C    1   NA   NA  

条形图：

----------------------------
|                          |
|       #    #             |
|    #  #    #             |
| #  #  #    #  #          |
| #  #  #    #  #  #    #  |
----------------------------
  X1 X2 X3   X1 X2 X3   x1
     A           B       C

Answer 1

使用基本图形，您可以简单地做到这一点：

mydf <- data.frame( X1=c(A=2, B=4, C=1), X2=c(3,2,NA), X3=c(4,1,NA) )
barplot(t(as.matrix(mydf)), beside=TRUE)

使用额外的调用axis可以使标签更像问题中的标签。

Answer 2

假设您不想要 ascii 输出，这里有一个解决方案ggplot2：

# load / generate your data
mydf <- data.frame( X1 = c(2,4,1), X2 = c(3,2,NA), x3 = c(4,1,NA), row.names=c("A","B","C") )
mydf$Category  <- row.names(mydf)

# bring your data to long format as needed by ggplot
library(reshape2)
mydf.molten <- melt(mydf, value.name="Count", variable.name="Variable", na.rm=TRUE)

# plot and facet by categories
library(ggplot2)
qplot( data=mydf.molten, x = Variable, y = Count, geom="bar", stat = "identity" ) + facet_wrap( "Category" )

有关更多详细信息，我建议查阅ggplot2 手册，尤其是关于geom_bar和的章节facet_wrap。