在许多语言中,有一个函数可以执行以下操作:
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);
我不知道是否有更有效的解决方案.