R：搜索另一个字符串中的一个字符串中的字，并返回不匹配的字

Question

我的数据表有两个文本列（col1和col2）。他们都有句子。我想在col2中查找col1中的所有单词，并返回一个字符串，其中包含col1中的单词，其中包含在col2中找到的单词。下面是一个例子

  col1     |   col2    |  output 
america, uk have too much money | uk, uk money too too | america, have much 

Answer 1

这样的事情？

DT <- data.table(col1 <- "america, uk have too much money", col2 <- "uk, uk money too too") 
DT[, output := paste(strsplit(DT[,col1], "(\\s+)|(?!')(?=[[:punct:]])", perl = TRUE)[[1]][!(strsplit(DT[,col1],"(\\s+)|(?!')(?=[[:punct:]])", perl = TRUE)[[1]] %in% strsplit(DT[,col2], "(\\s+)|(?!')(?=[[:punct:]])", perl = TRUE)[[1]])], collapse = " ")] 

没有逗号虽然