Как получить среднее количество слов из списка?

Question

Как рассчитать среднее количество слов в списке, используя для l oop в r ? У меня есть список с именем mylist, который содержит 25 векторов с кавычками символов на каждом векторе.

Вот мой код:

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

Но я получаю эту ошибку:

Ошибка в подсчете + i: non-numberri c аргумент бинарного оператора

Любая помощь будет принята с благодарностью!

Answer 1

Мы можем использовать lengths, чтобы получить length каждого vector в list, а затем обернуть mean

mean(lengths(mylist))

---

Если нам нужно все oop, затем создайте вектор для хранения length

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