2つのプロットを1つに結合する

Question

2つのデータセットのプロットを作成して値を比較しようとしています。

ggplot() 
ggplot(pos_plot, aes(x=WORD, y=FREQ)) + 
    geom_bar(position="dodge", colour="blue", stat = "identity") + 
ggplot(neg_plot, aes(x=WORD, y=FREQ)) + 
    geom_bar(position="dodge", colour="red", stat = "identity") 

しかし、私はこのコードを実行すると、私はエラーを取得する：

Error: Don't know how to add o to a plot 

誰も私が間違ってやっている知っていますか？

Answer 1

グラフィックの文法をもう少し詳しく調べる必要があります。 +の記号ggplotを使用して、別のggplotをプロットに追加することはできません。あなたはgridExtraパッケージからfacet_gridコメントで@ulfelderで述べたように、またはgrid.arrangeを使用することができます。

require(ggplot2) 
library(gridExtra) 
library(grid) 

dfpos <- data.frame(x=1,y=1) 
dfneg <- data.frame(x=-1,y=-1) 

ppos <- ggplot(dfpos, aes(x,y)) + geom_point() 
pneg <- ggplot(dfneg, aes(x,y)) + geom_point() 

grid.arrange(ppos,pneg) 

か、に独自のコードを書き換える：マージ場合、これは行うことが容易になります

ppos <- ggplot(pos_plot, aes(x=WORD, y=FREQ)) + 
     geom_bar(position="dodge", colour="blue", stat = "identity") 
pneg <- ggplot(neg_plot, aes(x=WORD, y=FREQ)) + 
     geom_bar(position="dodge", colour="red", stat = "identity") 
grid.arrange(ppos,pneg)