R-查找数据框中列出现次数最多/最少的值和比率

# 创建一个示例数据框
df <- data.frame(
  id = c(1, 2, 3, 4, 5),
  category = c("A", "B", "A", "C", "B")
)

# 使用table函数计算每个值的出现次数
value_counts <- table(df$category)

# 找到出现次数最多的值
most_frequent_value <- names(value_counts)[which.max(value_counts)]

# 计算出现次数最多值的比率
most_frequent_ratio <- max(value_counts) / sum(value_counts)

# 打印结果
cat("出现次数最多的值：", most_frequent_value, "\n")
cat("出现次数最多值的比率：", most_frequent_ratio, "\n")

出现次数最多的值： A
出现次数最多值的比率： 0.4

# 找到出现次数最少的值
least_frequent_value <- names(value_counts)[which.min(value_counts)]

# 计算出现次数最少值的比率
least_frequent_ratio <- min(value_counts) / sum(value_counts)

# 打印结果
cat("出现次数最少的值：", least_frequent_value, "\n")
cat("出现次数最少值的比率：", least_frequent_ratio, "\n")

出现次数最少的值： C
出现次数最少值的比率： 0.2