Почему мой l oop in R пропускает первый элемент из результатов?

Question

введите описание изображения здесь Мой код берет два аэропорта назначения (JFK, а затем Лас-Вегас), передает их через URL-адрес для возврата информации о рейсе в For L oop, которую я пытаюсь добавить во фрейм данных. Однако здесь учитываются только результаты последнего элемента - Лас-Вегаса. Должен ли я использовать для этого что-то другое, кроме списка?

library (httr)
library (jsonlite)

des <- c("JFK", "LAS")

flights = NULL 
flights = list()

  
  for (x in 1 : length(des))
  {
    url <- paste0("https://travelpayouts-travelpayouts-flight-data-v1.p.rapidapi.com/v1/prices/direct/?destination=", des[x], "&origin=BOS")
    
    r<-GET(url, add_headers("X-RapidAPI-Host" = "travelpayouts-travelpayouts-flight-data-v1.p.rapidapi.com",
                            "X-RapidAPI-Key" =   " MY KEY HERE ",
                            "X-Access-Token" = " MY TOKEN HERE"))
    
    jsonResponseParsed<-content(r,as="text")
    f <- fromJSON(jsonResponseParsed, flatten = TRUE)
    flights[[x]] <- data.frame(f$data)
  }

data = do.call(rbind, flights)
#price will be in rubles will need to convert to USD