tm_term_score: Compute Score for Matching Terms
Description
Compute a score based on the number of matching terms.
Usage
"tm_term_score"(x, terms, FUN = slam::row_sums)
"tm_term_score"(x, terms, FUN = function(x) sum(x, na.rm = TRUE))
"tm_term_score"(x, terms, FUN = function(x) sum(x, na.rm = TRUE))
"tm_term_score"(x, terms, FUN = slam::col_sums)
Arguments
terms
A character vector of terms to be matched.
FUN
A function computing a score from the number of terms
matching in x
.
Value
A score as computed by FUN
from the number of matching
terms
in x
.
Examples
data("acq")
tm_term_score(acq[[1]], c("company", "change"))
## Not run: ## Test for positive and negative sentiments
# ## install.packages("tm.lexicon.GeneralInquirer", repos="http://datacube.wu.ac.at", type="source")
# require("tm.lexicon.GeneralInquirer")
# sapply(acq[1:10], tm_term_score, terms_in_General_Inquirer_categories("Positiv"))
# sapply(acq[1:10], tm_term_score, terms_in_General_Inquirer_categories("Negativ"))
# tm_term_score(TermDocumentMatrix(acq[1:10],
# control = list(removePunctuation = TRUE)),
# terms_in_General_Inquirer_categories("Positiv"))## End(Not run)