/ Published in: R
ElementsTable contains 1. phrases, 2. frequency of a given phrase
Expand |
Embed | Plain Text
Copy this code and paste it in your HTML
FindContaining <- function(Element,ElementsTable) { list <- matrix(,nrow(ElementsTable),2) j <- 0 for (i in 1:nrow(ElementsTable)) { if (Element != ElementsTable[i,2]) { if ( grepl(Element,ElementsTable[i,2]) ) { j <- j+1 list[j,1] <- ElementsTable[i,1] list[j,2] <- ElementsTable[i,2] } } } list }