Skip to content

Commit

Permalink
Browse files Browse the repository at this point in the history
  • Loading branch information
LydiaYW committed Sep 12, 2024
1 parent df44a1f commit aaea228
Showing 1 changed file with 1 addition and 0 deletions.
1 change: 1 addition & 0 deletions README.qmd → PHS7045_lab4.qmd
Original file line number Diff line number Diff line change
Expand Up @@ -270,6 +270,7 @@ close_weather_state <- weather_station_lat[!(USAF %in% med_weather_state$USAF)][
]
library(leaflet)
# combine the two sets of stations and make two group
leaflet_station <- rbindlist(list(med_weather_state, close_weather_state), fill = TRUE) |>
mutate(group = fifelse(USAF %in% med_weather_state$USAF, "median", "closest"))
Expand Down

0 comments on commit aaea228

Please sign in to comment.