如何提取R语言字符串中出现频率最高的字符？

你可以通过字符串拆分、频次统计、取极值的逻辑实现需求，完整可运行代码如下：

1. 自定义目标函数 #

extract_most_frequent_character <- function(input_str) {
  # 按空格拆分输入字符串为独立字符向量
  split_vec <- unlist(strsplit(input_str, split = " "))
  # 生成频次统计表格
  freq_stat <- table(split_vec)
  # 提取出现频次最高的字符
  most_frequent_char <- names(which.max(freq_stat))
  # 按预期格式返回结果
  return(paste0("#", most_frequent_char))
}

2. 调用测试 #

# 定义测试字符串
test_string <- "A A B B C C C H I"
# 调用目标函数
extract_most_frequent_character(test_string)

3. 输出结果 #

#C

补充说明：如果存在多个字符同时达到最高频次的场景，将which.max(freq_stat)替换为freq_stat[freq_stat == max(freq_stat)]，即可返回所有符合条件的最高频字符。

内容的提问来源于stack exchange，提问作者AlSub