mysql - MySQL 中的 Damerau–Levenshtein 距离算法作为函数

Question

有谁知道 Damerau–Levenshtein 距离算法的 MySQL 实现作为一个存储过程/函数，它将单个指定的字符串作为参数并在特定表的特定字段中查找字符串的模糊匹配？

我找到了各种比较两个指定字符串并计算距离的过程/函数代码示例，但首先这只是 Levenshtein 距离算法，而不是 Damerau-Levenshtein 算法，其次，我不想比较两个字符串但是在我选择的字段中找到与我指定的字符串相似的模糊匹配项。

我基本上是在尝试在 MySQL 中组合一个模糊关键字搜索器。

Answer 1

Github正在进行修改 Sean Collins 代码的开发，使其支持 UTF-8 并且不区分大小写。

例子：

mysql> select damlevlim('camión', 'çamion', 6);

+--------------------------------------+
| damlevlim('camión', 'çamion', 6) |
+--------------------------------------+
|                                    0 |
+--------------------------------------+
1 row in set (0.00 sec)

这在进行模糊匹配时特别有用。

mysql> select word,damlevlim(word, 'camion') as dist from wordslist where damlevlim(word, 'camion', 7)<1 limit 2;

+--------+------+
| word   | dist |
+--------+------+
| camión |    0 |
| camios |    1 |
+--------+------+
2 row in set (0.00 sec)

Answer 2

在MySQL Levenshtein 和 Damerau-Levenshtein UDF 中，您有该算法的多个实现。

Answer 3

这似乎是一个老话题，但是如果有人寻找 Damerau-Levenshtein 距离的 MYSQL 实现，这里是我自己的实现（基于在本网站其他地方找到的一个简单的 Levenshtein），它适用于长度小于 255 个字符的字符串. 第三个参数可以设置为 FALSE 以检索基本的 Levenshtein 距离：

CREATE FUNCTION levenshtein( s1 VARCHAR(255), s2 VARCHAR(255), dam BOOL)
RETURNS INT
DETERMINISTIC
BEGIN
    DECLARE s1_len, s2_len, i, j, c, c_temp, cost INT;
    DECLARE s1_char, s2_char CHAR;
    -- max strlen=255
    DECLARE cv0, cv1, cv2 VARBINARY(256);
    SET s1_len = CHAR_LENGTH(s1), s2_len = CHAR_LENGTH(s2), cv1 = 0x00, j = 1, i = 1, c = 0;
    IF s1 = s2 THEN
        RETURN 0;
    ELSEIF s1_len = 0 THEN
        RETURN s2_len;
    ELSEIF s2_len = 0 THEN
        RETURN s1_len;
    ELSE
        WHILE j <= s2_len DO
            SET cv1 = CONCAT(cv1, UNHEX(HEX(j))), j = j + 1;
        END WHILE;
        WHILE i <= s1_len DO
            SET s1_char = SUBSTRING(s1, i, 1), c = i, cv0 = UNHEX(HEX(i)), j = 1;
            WHILE j <= s2_len DO
                SET c = c + 1;
                SET s2_char = SUBSTRING(s2, j, 1);
                IF s1_char = s2_char THEN
                    SET cost = 0; ELSE SET cost = 1;
                END IF;
                SET c_temp = CONV(HEX(SUBSTRING(cv1, j, 1)), 16, 10) + cost;
                IF c > c_temp THEN SET c = c_temp; END IF;
                SET c_temp = CONV(HEX(SUBSTRING(cv1, j+1, 1)), 16, 10) + 1;
                IF c > c_temp THEN SET c = c_temp; END IF;
                IF dam THEN
                    IF i>1 AND j>1 AND s1_char = SUBSTRING(s2, j-1, 1) AND s2_char = SUBSTRING(s1, i-1, 1) THEN
                        SET c_temp = CONV(HEX(SUBSTRING(cv2, j-1, 1)), 16, 10) + 1;
                        IF c > c_temp THEN SET c = c_temp; END IF;
                    END IF;
                END IF;
                SET cv0 = CONCAT(cv0, UNHEX(HEX(c))), j = j + 1;
            END WHILE;
            IF dam THEN SET CV2 = CV1; END IF;
            SET cv1 = cv0, i = i + 1;
        END WHILE;
    END IF;
    RETURN c;
END