我怎样才能从矢量中提取 TRUE 的百分比？

Question

这是用于派生我的问题中的第一个表的代码。

JH %>% group_by(ATT_ID, CAR=="B") %>%
summarize(count = n(), .groups = "drop")

ATT_ID	CAR == "B"
ONE	TRUE
ONE	TRUE
ONE	FALSE
TWO	TRUE
TWO	FALSE
THREE	FALSE
FOUR	TRUE

我怎样才能让上面的表格看起来像：\

ATT_ID	Percentage of "B"
ONE	67%
TWO	50%
THREE	0%
FOUR	100%

谢谢

Answer 1

我们可能会做

df1 %>%
   group_by(ATT_ID) %>%
   summarise(`CAR == "B"` == mean(`CAR == "B"`) * 100))