New to R.我想通过创建一个变量(是/否)来创建一个测试,该变量检查名或姓是否与电子邮件地址模糊匹配。如果是,在该行添加一个'yes'变量。
数据的例子:id firstname lastname email address match
1 patrick boyles patrickb@gmail.com yes
2 zeke cosmos zeke@gmail.com yes
3 foo foo abcd@gmail.com no
我明白我需要使用同意。让我困惑的是如何告诉R检查2列(名字和姓氏),只检查那一行。
谢谢-新手
library(stringdist) # install.packages("stringdist") b4, if you need to
df <- read.table(header = TRUE, text = "id firstname lastname emailaddress match
1 patrick boyles patrickb@gmail.com yes
2 zeke cosmos zeke@gmail.com yes
3 foo foo abcd@gmail.com no")
df$match2 <- ifelse(with(df, stringdist(a = paste0(firstname, lastname),
b = sub("(.*)@.*", "\1", emailaddress),
method = "lcs")) <= 7,
"yes", "no")
df
# id firstname lastname email.address match match2
# 1 1 patrick boyles patrickb@gmail.com yes yes
# 2 2 zeke cosmos zeke@gmail.com yes yes
# 3 3 foo foo abcd@gmail.com no no