如何在r的tibble中获得条件比例

install.packages("dplyr")
library(dplyr)

# 创建示例数据
df <- tibble(
  condition = c("A", "A", "B", "B", "A", "C", "C", "C")
)

# 使用filter()函数筛选出满足条件的行
filtered_df <- df %>% filter(condition == "A")

# 使用summarize()函数计算满足条件的比例
result <- filtered_df %>% summarize(percentage = n() / nrow(df) * 100)

# 打印结果
result