r - 获取两个单词之间的条目数

Question

您好，我找不到准备数据的解决方案。

目前我有两个如下所示的 Vector，我想将它们与额外列中的相应标题相匹配。哪些名称与哪个标题匹配由名称数据中名为“Top”的条目指示

name <- c("Top", "Name1", "Name2", "Top", "Name3", "Top", "Name4", "Name5")
title <- c("Title1", "Title2", "Title3")

结果应该是这样的:

Title1   Name1
Title1   Name2
Title2   Name3
Title3   Name4
Title3   Name5

一个想法是获取“Top”条目之间的名称数量并根据这些数字复制标题，但我该怎么做呢？

Answer 1

我们可以使用 if 语句:

1. 按首行分组
2. 取消分组并使用 str_detect 应用 if 条件，它检测 title 中的数字并检查它是否在 id 中
3. 如果为真 粘贴 标题 + id
4. 最后过滤以删除 Top 行

library(dplyr)
library(stringr)
df %>% 
  group_by(id = cumsum(name=="Top")) %>% 
  ungroup() %>% 
  mutate(Title = if(str_detect(title, "\\d+") %in% id) {paste0("Title",id)}) %>% 
  filter(str_detect(name, "Name"))

 Title  name 
  <chr>  <chr>
1 Title1 Name1
2 Title1 Name2
3 Title2 Name3
4 Title3 Name4
5 Title3 Name5