ifelseの引数を削除する

Question

私はここ数時間だけグラフ化しようとしています。私は私がggplotにプロットしてみたときに

which(RawGame1$event_desc == "Off Rebound") 
reb <- ifelse(RawGame1$event_desc_id == "O",1,"") 

今このifelse文のTRUE引数をグラフにしたい、私は13/22バーは第3引数（無意味なデータ）されている棒グラフを取得することがスキューひどくスケールと寸法。どうすれば削除できますか？私はそれを間違ってグラフしようとしていますか？

ggplot(RawGame1[,], aes(x = pid.first.char, fill = reb)) + 
geom_bar() + 
ggtitle("Off Reb by Player") + 
xlab("Player") + 
ylab("Total Rebounds") 

私にはわからない簡単な方法があります。 Rを熟読して助けてください。穏やかな。

Answer 1

データのサンプル（少なくともhead(RawGame1)が印刷されます）を提供していれば、プロットが現在どのように見えているのか、また目標が何であるのか、答えがはるかに簡単です。

しかし、RawGame1[,]にはフィルタリング条件のない括弧が含まれています。event_desc_id=="0"のみを選択する場合は、RawGame1[RawGame1$event_desc_id==0,]と書いてください。