派生一个字符串替换

在许多语言中,有一个函数可以执行以下操作:

replace(string, pattern, replacement)
replace("aSb", "S", "ba")
  => "abab"

但有没有办法编写一个相反的函数呢?

derive_replacement(before_string, after_string)
derive_replacement("space ba ba space ba", "fact ba ba fact ba")
  => ("space", "fact")

我知道有几种方法可以做到这一点,它会返回一个规则,让你从一个字符串到另一个字符串,但我正在寻找最短的一个.例如,以下两个技术都可以工作,但找不到最短的字符串:

derive(before, after) {
    return (before, after)
}

derive(before, after) {
    first_diff = len(commonprefix(before, after))
    last_diff = len(commonsuffix(before, after))
    return (before[first_diff:len(before) - last_diff],
        after[first_diff:len(after) - last_diff])
}

我正在寻找一种通用的方法来做到这一点,但如果它有所帮助,我试图让它在Haskell中工作.但是,任何语言甚至伪代码都足够了.

最佳答案 这不是一个简单的问题.

你的第二个例子在某些情况下会提供错误的结果.考虑如果你打电话会发生什么

派生(“foo foo foo”,“foo baz foo”).

显然,蛮力方法是可能的,例如(在类似cued的伪代码中)

if (before==after) return "",""
for (pl=1;pl<(len(before)-1);pl++) {
  for (ps=0;ps<=len(before)-pl;ps++) {
    for (rl=1;rl<len(after)-ps;rl++) {
      pattern=substr(before,ps,pl);
      replacement=substr(after,ps,rl);
      if (replace(before,pattern,replacement) == after) {
        return(pattern,replacement);
      }
    }
  }
}
return (before,after);

我不知道是否有更有效的解决方案.

点赞