find if string contains mutliple words in r

Question

I have the following data frame:

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

I want to check if the Company column contains any word that is either in the firstName or the Surname.

I have used the following code:

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

But what it checks is the whole string is present. Hence it works for the first row, but misses the second row, and gets the last row correct because it detected a blank firstName entry.

How to write a function that produces FALSE, TRUE, TRUE ?

Don't have time for a long answer but try: apply(dat, 1, function(x){grepl(paste(x[1:2], collapse="|"), x[3])}) — Tyler Rinker
– Tyler Rinker, Commented Apr 20, 2016 at 3:37

thelatemail · Accepted Answer · 2016-04-20 04:01:28Z

How about this, using intersect to do the hard work?:

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

Collectives™ on Stack Overflow

find if string contains mutliple words in r

1 Answer 1

1 Comment

Hot Network Questions

Collectives™ on Stack Overflow

1 Answer 1

1 Comment

Related