代码之家  ›  专栏  ›  技术社区  ›  SJB

多个精确单词匹配,在R中处理时间更快

r
  •  1
  • SJB  · 技术社区  · 6 年前

    我需要在R中进行多个精确的单词匹配。请检查我的代码,

    lapply(test1, function(x) length(which(grepl("\\b17.02\\b", x) |  grepl("\\b18.1\\b", x)))) 
    

    请帮我找到处理速度更快的代码。

    我已经生成了一个用于测试的数据集,

    x1 <- runif(n = 50000000, min = 1, max = 100)
    x2 <- runif(n = 50000000, min = 5, max = 30)
    x3 <- runif(n = 50000000, min = 12, max = 30)
    
    df <- cbind.data.frame(x1,x2,x3)
    

    谢谢 SJB

    0 回复  |  直到 6 年前