Displaying 1 result from an estimated 1 matches for "allworddataresults_".
2010 Apr 15
0
Automating searching text for key words
..."", Select.WebAdd)
WordData_[[i]]<- scan(url(Select.WebAdd), what = "character")
}
#Define words to look for
SearchWords_ <-c("Bush","actor")
#Create lists to store retunred values WordDataResults_<-list()
AllWordDataResults_<-list()
WordDataResults_<-list()
for(i in 1:length(WordData_)){
for(j in 1:length(SearchWords_)){
#Loop through all transcripts searching for each of the words in the
search list
WordData.X <- sub(paste("", SearchWords_[j], ").*", sep=""),...