文字列をr

Question

にmutliple言葉が含まれている場合、私は、次のデータフレームを持って見つける：

dat <- data.frame(Name = c("John", "Company A pty Ltd", ""), Surname = c("Smith", "", "Company B"), Company = c("Company D", "A Ltd", "Company B")) 

私は会社の列がfirstNameのか姓のいずれかである任意の単語が含まれているかどうかを確認します。

dat$clinicOnly <- mapply(grepl, pattern=dat$firstName, dat$Company) 

しかし、それはチェックしている文字列全体が存在している：

私は、次のコードを使用しています。したがって、最初の行では動作しますが、2番目の行が見つからないため、空のfirstNameエントリが検出されたため、最後の行が正しいものになります。

FALSE、TRUE、TRUEを生成する関数を書くにはどうすればよいですか？

Answer 1

どのようにこのことについて、ハードな作業を行うためにintersectを使用して？：

v1 <- strsplit(do.call(paste, dat[1:2]), "\\s+") 
v2 <- strsplit(as.character(dat$Company), "\\s+") 

mapply(function(x,y) length(intersect(x,y)) > 1, v1, v2) 
#[1] FALSE TRUE TRUE