如何从相互满足最大字符串距离标准的大矩阵中返回字符串对列表?

问题描述

我正在尝试以一种方式呈现人工输入的单词,使它们的分组更容易识别为指同一事物。本质上是一个拼写检查器。我已经制作了一个大矩阵(实际的矩阵是 250 * 250 ish)。此矩阵的代码与下面给出的可重现示例相同。 (我已经用随机词生成器填充了它,实际值更有意义但保密)

strings <- c("domineering","curl","axiomatic","root","gratis","secretary","lopsided","cumbersome","oval","mighty","thaw","troubled","furniture","round","soak","callous","melted","wealthy","sweltering","verdant","fence","eyes","ugliest","card","quickest","harm","brake","alarm","report","glue","hollow","quince","pack","twig","knot")

matrix <- stringdistmatrix(strings,strings,useNames = TRUE)

现在我想创建一个包含两个变量的新表,第一列必须包含满足字符串距离小于某个数字的条件的“字符串”元素对,例如(stringdist

我有一种感觉,这将需要某种 apply 函数,但我不知道。

干杯。

解决方法

暂无找到可以解决该程序问题的有效方法,小编努力寻找整理中!

如果你已经找到好的解决方法,欢迎将解决方案带上本链接一起发送给小编。

小编邮箱:dio#foxmail.com (将#修改为@)