r - data.frame から棒グラフを作成する

Question

RI には、図の上部にあるような data.frame があります。

以下のようなバープロットを作成する可能性はありますか?

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ます。