data-raw/dict_modifiers.R

In chris31415926535/tidyvader: Tidyvader: Fast, Clear, and Tidy Rule-Based Sentiment Analysis with VADER

## code to prepare `dict_modifiers` dataset goes here

dict_modifiers <- dplyr::tribble(
  ~word, ~booster_value, ~booster_sign,
  "absolutely", 0.293, 1,
  "amazingly", 0.293, 1,
  "awfully", 0.293, 1,
  "completely", 0.293, 1,
  "considerable", 0.293, 1,
  "considerably", 0.293, 1,
  "decidedly", 0.293, 1,
  "deeply", 0.293, 1,
  "effing", 0.293, 1,
  "enormous", 0.293, 1,
  "enormously", 0.293, 1,
  "entirely", 0.293, 1,
  "especially", 0.293, 1,
  "exceptional", 0.293, 1,
  "exceptionally", 0.293, 1,
  "extreme", 0.293, 1,
  "extremely", 0.293, 1,
  "fabulously", 0.293, 1,
  "flipping", 0.293, 1,
  "flippin", 0.293, 1,
  "frackin", 0.293, 1,
  "fracking", 0.293, 1,
  "fricking", 0.293, 1,
  "frickin", 0.293, 1,
  "frigging", 0.293, 1,
  "friggin", 0.293, 1,
  "fully", 0.293, 1,
  "fuckin", 0.293, 1,
  "fucking", 0.293, 1,
  "fuggin", 0.293, 1,
  "fugging", 0.293, 1,
  "greatly", 0.293, 1,
  "hella", 0.293, 1,
  "highly", 0.293, 1,
  "hugely", 0.293, 1,
  "incredible", 0.293, 1,
  "incredibly", 0.293, 1,
  "intensely", 0.293, 1,
  "major", 0.293, 1,
  "majorly", 0.293, 1,
  "more", 0.293, 1,
  "most", 0.293, 1,
  "particularly", 0.293, 1,
  "purely", 0.293, 1,
  "quite", 0.293, 1,
  "really", 0.293, 1,
  "remarkably", 0.293, 1,
  "so", 0.293, 1,
  "substantially", 0.293, 1,
  "thoroughly", 0.293, 1,
  "total", 0.293, 1,
  "totally", 0.293, 1,
  "tremendous", 0.293, 1,
  "tremendously", 0.293, 1,
  "uber", 0.293, 1,
  "unbelievably", 0.293, 1,
  "unusually", 0.293, 1,
  "utter", 0.293, 1,
  "utterly", 0.293, 1,
  "very", 0.293, 1,
  "almost", -0.293, -1,
  "barely", -0.293, -1,
  "hardly", -0.293, -1,
  "just enough", -0.293, -1,
  "kind of", -0.293, -1,
  "kinda", -0.293, -1,
  "kindof", -0.293, -1,
  "kind-of", -0.293, -1,
  "less", -0.293, -1,
  "little", -0.293, -1,
  "marginal", -0.293, -1,
  "marginally", -0.293, -1,
  "ocassional", -0.293, -1,
  "occasionally", -0.293, -1,
  "partly", -0.293, -1,
  "scarce", -0.293, -1,
  "scarcely", -0.293, -1,
  "slight", -0.293, -1,
  "slightly", -0.293, -1,
  "somewhat", -0.293, -1,
  "sort of", -0.293, -1,
  "sorta", -0.293, -1,
  "sortof", -0.293, -1,
  "sort-of", -0.293, -1,
)

mod_bigrams <- c("kind of", "sort of")

dict_mod_word <- dict_modifiers$word
dict_mod_value <- dict_modifiers$booster_value
#
# usethis::use_data(dict_mod_word, internal=TRUE, overwrite = TRUE)
# usethis::use_data(dict_mod_value, internal=TRUE, overwrite = TRUE)
# usethis::use_data(dict_modifiers, internal=TRUE, overwrite = TRUE)