Это потому, что вы присваиваете значение stas каждый раз, когда цикл оборачивается и, таким образом, перезаписывает предыдущее значение.Решение состоит в том, чтобы переместить присваивание переменной за пределы цикла и добавить значение следующим образом:
all_stas <- list()
for(i in vid_id){
stas <- get_stats(video_id = i)
all_stas <- append(all_stas,stas)
}
View(all_stas)
Обратите внимание, здесь я определил переменную all_stas как список, потому что я не знаю, что такое функция "get_stats"возвращается и list () должен иметь возможность обрабатывать все, что вы хотите добавить.Если вы возвращаете data.frame, вы можете использовать функцию rbind () вместо