update to flightV5

This commit is contained in:
lukasadrion
2026-01-05 14:17:16 +01:00
parent 09ca49ec99
commit bdf075353c
2 changed files with 7 additions and 8 deletions

View File

@@ -30,9 +30,8 @@ all_flights <- list()
for(d in dates) {
d <- as.Date(d)
# korrekter Dateiname
file_name <- paste0("flight_sample_", d, ".csv.gz")
url <- paste0("https://s3.opensky-network.org/data-samples/flights/", file_name)
url <- paste0("https://s3.opensky-network.org/data-samples/flightsV5/", file_name)
message("Downloading: ", url)
@@ -41,7 +40,7 @@ for(d in dates) {
tryCatch({
download.file(url, dest, mode = "wb")
# CSV lesen
# read csv
df <- read_csv(dest, col_types = cols(.default = "c"))
all_flights[[length(all_flights)+1]] <- df
}, error = function(e) {