识别R中字符匹配的百分比

Question

我希望计算r中字符串的百分比匹配。例如:

x <- "asdf"     
y <- "fdjk"     

我希望返回0.5(例如2个匹配，无论顺序如何)。任何想法都是非常感激的。

Answer 1

您可以使用strsplit:

将字符串拆分为特定的字符

char.x <- strsplit(x, "")[[1]]
char.x
# [1] "a" "s" "d" "f"
char.y <- strsplit(y, "")[[1]]
char.y
# [1] "f" "d" "j" "k"

现在，你可以使用intersect和length来计算你的度量(确切的公式不清楚，因为你的帖子没有指定，例如，如何处理重复字符):

length(intersect(char.x, char.y)) /
  max(length(unique(char.x)), length(unique(char.y)))
# [1] 0.5