将出现次数最少的字符串转换为R中矩阵中出现次数最高的字符串

# 统计字符串出现次数
string_list = ["apple", "banana", "apple", "orange", "banana", "apple"]
count_dict = {}
for string in string_list:
    if string in count_dict:
        count_dict[string] += 1
    else:
        count_dict[string] = 1

# 找到出现次数最少的字符串
min_count = float('inf')
min_string = ""
for string, count in count_dict.items():
    if count < min_count:
        min_count = count
        min_string = string

# 找到出现次数最高的字符串
max_count = 0
max_string = ""
for string, count in count_dict.items():
    if count > max_count:
        max_count = count
        max_string = string

# 转换字符串
for i in range(len(string_list)):
    if string_list[i] == min_string:
        string_list[i] = max_string

print(string_list)