时间戳

首页 > 解决方案 > 如何在字符串中找到相同的模式？

r - 如何在字符串中找到相同的模式？

问题描述

我想从字符串中提取相同的模式，比如说

a <- "abczzzzz"
b <- "rrrrabckkk"

我想得到“abc”的结果，比如

somefunction(a,b)
> "abc"

已经检查过stringr包，但是，这些功能都需要我没有的已知模式，并且不可能知道模式的 nchar，所以，我更喜欢最长匹配模式。请指教，谢谢。

更新 - -

事实上，我正在处理一个庞大的数据集，就像我只有传感器的描述一样，想找出它所属的机器名称，而机器名称将是描述中最常见的词。逐字比较是可行的，我仍在寻找更有效的方法。谢谢！答案已经帮助我向前迈进了一大步。

标签： rstringr

解决方案

我们可以在每个字符处拆分字符串并用于intersect获取常见的字符串。

intersect(strsplit(a, "")[[1]], strsplit(b, "")[[1]])
#[1] "a" "b" "c"

为了按照要求获得准确的输出，我们可以paste将它们放在一起。

paste(intersect(strsplit(a, "")[[1]], strsplit(b, "")[[1]]), collapse = "")
#[1] "abc"

如果我们可以使用多个字符串Reduce（另见此处）：

a <- "abczzzzz"
b <- "rrrrabckkk"
c <- "dsaqwabc"

paste(Reduce(intersect, strsplit(c(a, b, c), "")), collapse = "")
#[1] "abc"

推荐阅读