如何在带有R的向量中找到重复次数最多的单词

# 创建一个带有重复单词的向量
words <- c("apple", "banana", "apple", "orange", "banana", "apple", "banana", "orange", "apple")

# 使用table()函数计算每个单词的出现次数
word_counts <- table(words)

# 找到出现次数最多的单词的次数
max_count <- max(word_counts)

# 找到出现次数等于最大次数的单词的索引
max_count_indexes <- which(word_counts == max_count)

# 找到对应索引的单词
most_frequent_words <- names(word_counts[max_count_indexes])

# 输出结果
print(paste("重复次数最多的单词是：", most_frequent_words))