从data.frame列列表中提取最频繁的匹配值

# 示例数据
df <- data.frame(
  col1 = c("apple", "banana", "apple", "orange", "banana"),
  col2 = c("apple", "banana", "orange", "banana", "apple"),
  col3 = c("banana", "apple", "apple", "banana", "orange")
)

# 将列列表转换为向量
vec <- unlist(df)

# 计算每个值的频数
freq <- table(vec)

# 找到频数最大的值所在的位置
max_freq_pos <- which.max(freq)

# 获取最频繁的匹配值
most_frequent_value <- names(freq)[max_freq_pos]

# 输出结果
print(most_frequent_value)