我有一个模式向量和一个潜在匹配候选的大向量。对于x中的每个元素，我使用agrep获取y中的近似匹配列表。问题是代码非常慢 - x每个元素大约需要2秒。
有没有办法加快速度？此示例中的x只有6个元素，但在实际项目中x的长度为41k。 y这里约有103k元素，接近现实生活。
如果您需要查看示例输出，请使用3300替换y中的1
提前致谢！
x = c("procter & gamble; tide free & gentle", "procter & gamble; tide he turbo clean",
"procter & gamble; tide simply clean", "procter & gamble; tide simply clean & fresh",
"procter & gamble; tide simply clean & sensitive", "procter & gamble; tide total care")
y = rep(c("procter & gamble; tide", "procter & gamble; tide & downy",
"procter & gamble; tide actilift", "procter & gamble; tide basic",
"procter & gamble; tide boost", "procter & gamble; tide boost vivid white + bright",
"procter & gamble; tide buzz", "procter & gamble; tide cold water",
"procter & gamble; tide colorguard", "procter & gamble; tide compact",
"procter & gamble; tide febreze", "procter & gamble; tide febreze sport",
"procter & gamble; tide high efficiency", "procter & gamble; tide oxi",
"procter & gamble; tide plus", "procter & gamble; tide plus colorguard",
"procter & gamble; tide pods", "procter & gamble; tide pods plus febreze",
"procter & gamble; tide pure essentials", "procter & gamble; tide simple pleasures",
"procter & gamble; tide simply clean & fresh", "procter & gamble; tide simply clean & sensitive",
"procter & gamble; tide stain release", "procter & gamble; tide stain release free",
"procter & gamble; tide to go", "procter & gamble; tide total clean",
"procter & gamble; tide totalcare", "procter & gamble; tide ultra 2",
"procter & gamble; tide vivid white & bright", "procter & gamble; tide with dawn",
"procter & gamble; tidekick"),3300)
mapped = as.matrix("",nrow=length(x))
myMap = function() {
for (i in 1:length(x)) {
mapped[i] = paste(y[agrep(x[i],y,max.distance=2.9,fixed=T,useBytes=T)],collapse = "|")
}
return(mapped)
}
print(microbenchmark(myMap(),times=5))
时序
Unit: seconds
expr min lq mean median uq max neval
myMap() 11.57354 11.61535 11.6225 11.61919 11.64641 11.658 5
y中仅重复1次的示例输出：
1
2
3 procter & gamble; tide simple pleasures|procter & gamble; tide simply clean & fresh|procter & gamble; tide simply clean & sensitive
4 procter & gamble; tide simply clean & fresh
5 procter & gamble; tide simply clean & sensitive
6 procter & gamble; tide total clean|procter & gamble; tide totalcare