sentencizer: removed derived output from function

master
Your Name 4 years ago
parent 80ec0be1f8
commit 36f2b341a8

@ -55,10 +55,6 @@ sentencizer <- function(out, sent_dict = NULL, localhost = NULL, validation = F)
words = length(lemma), words = length(lemma),
sent_words = sum(prox != 0), sent_words = sum(prox != 0),
# sent_lemmas = list(lem_u[prox != 0]) # sent_lemmas = list(lem_u[prox != 0])
) %>%
mutate(
sent = sent_sum/words,
arousal = sent_words/words
) )
## If there is no dictionary, create a ud_sent, with just sentence ids and word counts per sentence ## If there is no dictionary, create a ud_sent, with just sentence ids and word counts per sentence
} else { } else {

Loading…
Cancel
Save