如何从列表中获取单词的平均值?

How to get an average of words from a list?

如何在 中使用 for 循环计算列表中的平均单词数?我有一个名为 mylist 的列表,其中包含 25 个向量,每个向量上都有字符引号。

到目前为止,这是我的代码:

count <- 0
for (i in mylist[1:25]){
count <- count + i
mean(count)
}

但是我得到这个错误:

Error in count + i : non-numeric argument to binary operator

任何帮助将不胜感激!

我们可以用lengths得到list中每个vectorlength,然后用mean

换行
mean(lengths(mylist))

如果我们需要一个循环,那么创建一个向量来存储 length

v1 <- numeric(length(mylist))
for(i in seq_along(mylist)) v1[i] <- length(mylist[[i]])
mean(v1)