R/aaa.R

In LucyMcGowan/parkhoppr: API for accessing Disney World wait times

.park_lookup <- list(
  magic_kingdom = list(park_id = 80007944, resort_id = 80007798),
  animal_kingdom = list(park_id = 80007823, resort_id = 80007798),
  epcot = list(park_id = 80007838, resort_id = 80007798),
  hollywood_studios = list(park_id = 80007998, resort_id = 80007798),
  disneyland_mk = list(park_id = 330339, resort_id = 80008297),
  disneyland_cali_adventure = list(park_id = 336894, resort_id = 80008297)
)