ggplotグループ化された棒グラフにRの各グループに応じたパーセンテージを示す方法は？

Question

私は2つの文字列 "stringA1"と "stringA2"を含む変数aを持つdfを持っています。また、 "StringB1"、 "stringB2"、 "stringB3"の3つの文字列を含む変数bもあります。

変数bでグループ化され、各グループ内の "stringA1"と "stringA2"の割合を示すグラフが必要です。

私がアドバイス下記のリンクを掲載続く：https://sebastiansauer.github.io/percentage_plot_ggplot2_V2/

そして、私のデータを合わせて翻訳：

p <- ggplot(STW, aes(x=STW$Q071_3, group=STW$Q01))+ 
    geom_bar(mapping = aes(y = ..prop.., fill = factor(..x..), x=STW$Q071_3), 
    stat="count")+ 
    scale_y_continuous(labels=scales::percent)+ 
    facet_grid(~Q01)+ 
p 

これは、しかし、私は100％以上でグラフを与え、私は見つけることができませんエラー。

私は(..count..)/sum(..count..)で遊んだりしようとしましたが、有用な結果は得られませんでした。

どうすればこの問題を解決できますか？ありがとうございます。詳細情報を掲載する必要があるかどうかお知らせください。こちらが最初に投稿した記事です。簡潔で分かりやすいようにお願いします。

ありがとうございます！

Answer 1

多くの試しに試した結果、x=STW$とSTW$がgroup=STW$Q01から削除されました。理由はわかりませんが、現在はすべて正常に動作しています。ここで

固定コード：

p <- ggplot(STW, aes(Q071_3, group=Q01))+ 
    geom_bar(aes(y = ..prop.., fill = factor(..x..)), stat="count")+ 
    scale_y_continuous(labels=scales::percent)+ 
    facet_grid(~Q01) 
p