我请求帮助按ID分组，计算非零，并将结果显示为该特定ID中总数的百分比我的数据
library(dplyr)
id<-c(1,1,1,1,1,2,2,2,2)
x<-c(0,1,0,1,0,0,0,1,0)
df1<-data.frame(id,x)
head(df1)
在我的结果中，在按id=1分组后，我需要一列的total为2，另一列的percentage(2/5(为40。对于组id=2，则我需要列的总数为1，百分比为(1/4(=25
df1 %>%
group_by(id) %>%
summarise(sum_of_1 = sum(x!=0),
pct= round((sum_of_1/n())*100))
这个有效。感谢绿巨人的帮助
试试这个-
df1 %>%
group_by(id) %>%
summarise(sum_of_1 = sum(x, na.rm = TRUE),
pct = round((sum_of_1/n())*100))