0

我有 2 个数据框(df1 和 df2)

自由度 1:

在此处输入图像描述

df 2:

在此处输入图像描述

所需输出:

df3

在此处输入图像描述

4

1 回答 1

2

而不是图片,您应该尝试以可重现的格式放置数据。另外,尝试展示一些作品,但我可以理解你可能不知道从哪里开始。但至少展示你尝试过的东西是否有效。

这样的事情会起作用吗?

library(dplyr)
df1 <- data.frame(almId = c(12347, 123455, 112625, 112621), almname = c("1001 battery down", "2077 Power issue", "7166 DG fault", "2122 cable cut"))

df2 <- data.frame(almname = c("battery down", "Power issue", "DG fault", "Circuit break"))

k <- paste0(df2$almname, collapse = "|")
df1 %>% mutate(Stat = stringr::str_detect(.$almname, k))

df3 <- df1 %>% mutate(Stat = stringr::str_detect(.$almname, k))

   almId           almname  Stat
1  12347 1001 battery down  TRUE
2 123455 2077 Power issue  TRUE
3 112625 7166 DG fault  TRUE
4 112621 2122 cable cut FALSE
于 2020-07-01T15:41:46.637 回答