主要人物出现次数r语言

假设你已经将主要人物的姓名提取出来，并将它们存储在一个字符向量中，可以使用R语言中的字符串匹配函数来计算每个人物出现的次数。以下是一个示例代码：

# 创建一个包含主要人物姓名的字符向量
main_characters <- c("Harry", "Ron", "Hermione")

# 读取文本文件并将其存储为一个字符向量
text <- readLines("book.txt")

# 使用字符串匹配函数计算每个人物出现的次数
character_counts <- sapply(main_characters, function(x) sum(grepl(x, text, ignore.case = TRUE)))

# 输出每个人物出现的次数
character_counts

这个代码中，我们首先创建了一个包含主要人物姓名的字符向量。然后，我们使用`readLines()`函数将文本文件读取到一个字符向量中，以便我们可以在其中搜索每个人物的出现次数。接下来，我们使用`sapply()`函数来遍历每个人物的姓名，并使用`grepl()`函数在文本中查找该人物的姓名。`grepl()`函数返回一个逻辑向量，指示文本中是否包含该人物的姓名。我们使用`sum()`函数来计算逻辑向量中`TRUE`的数量，从而得出每个人物在文本中出现的次数。最后，我们输出每个人物的出现次数。