P281424/AMR
1
0 Fork 0
mirror of https://github.com/msberends/AMR.git synced 2026-10-01 04:13:33 +02:00
Code Releases Activity

(v1.3.0.9019) small fix

Browse Source
This commit is contained in:
dr. M.S. (Matthijs) Berends committed 2020-09-14 14:08:07 +02:00
1 parent 7b6dd676f7
commit 354c606d6a
13 files changed
+23 -23
Download Patch File Download Diff File Expand all files Collapse all files

No files matched your search

R/mo.R
+1 -1
View File
@@ -314,7 +314,7 @@ exec_as.mo <- function(x,
res_df <- haystack[which(eval(substitute(needle), envir = haystack, enclos = parent.frame())), , drop = FALSE]
if (NROW(res_df) > 1) {
# sort the findings on matching score
res_df <- res_df[order(mo_matching_score(x_backup[i], res_df[, "fullname", drop = TRUE]), decreasing = TRUE), , drop = FALSE]
res_df <- res_df[order(mo_matching_score(input, res_df[, "fullname", drop = TRUE]), decreasing = TRUE), , drop = FALSE]
}
res <- as.character(res_df[, column, drop = TRUE])
if (length(res) == 0) {