使用 group by [duplicate] 计算单词总数

问：

我想按以下方式计算文本组中的单词总数：id

df <- data.frame(id=rep(1:3, 2), tx=c("test one. test two", "this is a test. again test", "test two", "test three times", 
                                      "test, in a future time point", "test has completed, at the final time point"))

我如何实现这样的结果：

id  word count
1   7
2   12
3   10

我看了另一篇帖子 计算字符串中所有单词的数量，但它没有显示如何按组计算单词。