Changing polarity of words in the dictionary about sentimentr HOT 2 CLOSED

library(sentimentr)
library(data.table)

my_key <- sentimentr::update_key(
    lexicon::hash_sentiment_jockers_rinker[x != 'tender'], 
    x = data.frame(x = c("tender"), 
    y = c(-1))
)

lexicon::hash_sentiment_jockers_rinker['tender']
my_key['tender']

sentimentr::sentiment(x)

##    element_id sentence_id word_count sentiment
## 1:          1           1          6 0.3061862

sentimentr::sentiment(x, polarity_dt = my_key)

##    element_id sentence_id word_count  sentiment
## 1:          1           1          6 -0.4082483