Мой l oop не заполняет мою матрицу данными, которые я спрашиваю

Question

Я пытаюсь заполнить матрицу результатами суммы, которую я включил в al oop, но каждый раз, когда я запускаю l oop, матрица отображается заполненной нулями вместо значений, которые должны быть заполнены это из л oop. Это код:

cada_aerolinea<-unique(aerolineas)
resultados<-matrix(0, length(cada_aerolinea), 1)
row.names(resultados)<-cada_aerolinea
for (i in length(cada_aerolinea)) {
  resultados[i]<-sum(fatalities[aerolineas==cada_aerolinea[i]])
  print(resultados[i])
}

Когда я запускаю полный код, строка «print (resultados [i])» возвращает только одно число «41», которое я не знаю, где оно происходит, и когда я просто запускаю "resultados", r просто показывает матрицу, заполненную нулями. Кто-нибудь знает, что я делаю не так?

Answer 1

for (i in length(cada_aerolinea)) {

должно быть

for (i in 1:length(cada_aerolinea)) {

Я делаю эту ошибку все время;). Кроме того, я думаю, что вы можете заменить свой l oop на:

resutados = tapply(facilities, cada_aerolinea, SUM)