2017-07-20 3 views
0

Im essayant d'utiliser apply pour comparer la distance entre une grille de texte L'idée serait d'essayer puis paralléliser l'opération en utilisant la fonction parallel en RR en utilisant une demande de comparaisons de chaînes

Quand je lance le dessous code je reçois l'erreur

Error in FUN(newX[, i], ...) : unused argument (newX[, i]) 

Quelqu'un peut-il voir où je vais mal?

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) 

Répondre

1

Je pense que la fonction apply est pas correctement défini, vous pouvez essayer cette

apply(my_grid, MARGIN = 1, FUN = function(V) levenshteinSim(V[1],V[2])) 
+0

Parfait, je vous remercie beaucoup pour votre aide –