R группировка и подсчет лексики аффинности

Question

У меня есть список слов, лексика freq и affinity, и я пытаюсь сосчитать и сгруппировать, но не уверен, как включить частоту в код.каждая из этих двух строк работает, за исключением того, что в добавлении не учитывается столбец freq, и я не уверен, как это сделать.

ddply(summaryLex,~sentiment,summarise,frequency=length(unique(word)))

sqldf("SELECT sentiment, COUNT(sentiment) as totalsent from summaryLex GROUP BY sentiment")
summaryLex csv file][1]

файл SummaryLex:

[] [2] https://drive.google.com/open?id=15KBebiqXsNnndOP2mzoaxnvx1nk8Z8vL

Answer 1

если data.table:
data[, sum(freq), by = sentiment]

если dplyr:

data %>%
   group_by(sentiment) %>%
   summarise(sum = sum(freq))