Fecha de la ultima revisión
## [1] "2021-02-01"https://www.transtats.bts.gov/DL_SelectFields.asp?Table_ID=236
Another package to get information about flights but it does not include SJU.
library(anyflights)#get_airports(dir = NULL)
#pdxflightsSJU <- anyflights("RIL", 2019, 1)
#get_airlines(flights_data = get_flights("LMM", 2018,1))
airports=get_airports(dir = NULL)
head(airports)| faa | name | lat | lon | alt | tz | dst | tzone |
|---|---|---|---|---|---|---|---|
| AAF | Apalachicola Regional Airport | 29.7 | -85 | 20 | -5 | A | America/New_York |
| AAP | Andrau Airpark | 29.7 | -95.6 | 79 | -6 | A | America/Chicago |
| ABE | Lehigh Valley International Airport | 40.7 | -75.4 | 393 | -5 | A | America/New_York |
| ABI | Abilene Regional Airport | 32.4 | -99.7 | 1.79e+03 | -6 | A | America/Chicago |
| ABL | Ambler Airport | 67.1 | -158 | 334 | -9 | A | America/Anchorage |
| ABQ | Albuquerque International Sunport | 35 | -107 | 5.36e+03 | -7 | A | America/Denver |
#airports %>% select(faa) %>%
# filter(faa=="MIA")
#head(pdxflightsSJU)