Updates a sento_measures
object based on a new sento_corpus
provided.
Sentiment for the unseen corpus texts calculated and aggregated applying the control variables
from the input sento_measures
object.
measures_update(sento_measures, sento_corpus, lexicons)
sento_measures
object created with sento_measures
a sento_corpus
object created with sento_corpus
.
a sento_lexicons
object created with sento_lexicons
.
An updated sento_measures
object.
data("usnews", package = "sentometrics")
corpus1 <- sento_corpus(usnews[1:500, ])
corpus2 <- sento_corpus(usnews[400:2000, ])
ctr <- ctr_agg(howTime = "linear", by = "year", lag = 3)
l <- sento_lexicons(list_lexicons[c("LM_en", "HENRY_en")],
list_valence_shifters[["en"]])
sento_measures <- sento_measures(corpus1, l, ctr)
sento_measuresNew <- measures_update(sento_measures, corpus2, l)