以下のコード例 ( productplots または ggmosaic からの幸せなデータセットを使用) を使用すると、さまざまなカテゴリ変数 (性別、結婚、健康、学位) を幸せ (幸せ) で分類してすばやく視覚化できます。これを達成するには、条件付けたい変数を「収集」関数 (この場合は「幸せ」) から分離する必要があります。しかし、この変数を変更したい場合はどうすればよいでしょうか? または別の組み合わせを作成しますか？以下のコードを継続的に再現し、変数を変更する必要があります。関数でこれを達成するためのより速い方法はありますか? purrr パッケージは何らかの形で役に立ちますか?
Df1<-happy%>%
select(sex, happy, marital, health, degree)%>%
gather(key, value, -happy)%>%
count(happy, key, value)%>%
na.omit()%>%
mutate(perc=round(n/sum(n),2))
P<-ggplot(H5)+geom_col(aes(x=value,y=perc,fill=happy))+facet_wrap
(~key,scales="free")+geom_text(aes
(x=value,y=perc,label=perc,group=happy),position=position_stack(vjust=.05))
できるだけ Tidyverse に基づいたソリューションを希望します。