我尝试使用apply
来比较文字网格之间的距离
我们的想法是尝试使用R
parallel
函数然后并行化操作
当我运行以下代码时,我收到错误
Error in FUN(newX[, i], ...) : unused argument (newX[, i])
谁能看到我出错的地方?
d <- iris
my_grid <- expand.grid(unique(d$Species), unique(d$Species), stringsAsFactors = FALSE)
apply(my_grid, MARGIN = 1, FUN = levenshteinSim, str1 = Var1, str2 = Var2)
答案 0 :(得分:1)
我认为apply
中的功能没有正确定义,你可以试试吗
apply(my_grid, MARGIN = 1, FUN = function(V) levenshteinSim(V[1],V[2]))