From aaea2285f4a043980403c57df8609d1262f4cb8e Mon Sep 17 00:00:00 2001
From: LydiaYW <yingjia.wei@hsc.utah.edu>
Date: Thu, 12 Sep 2024 17:07:41 -0600
Subject: [PATCH] Finalizing lab 3
 https://github.com/UofUEpiBio/PHS7045-advanced-programming/issues/27

---
 README.qmd => PHS7045_lab4.qmd | 1 +
 1 file changed, 1 insertion(+)
 rename README.qmd => PHS7045_lab4.qmd (99%)

diff --git a/README.qmd b/PHS7045_lab4.qmd
similarity index 99%
rename from README.qmd
rename to PHS7045_lab4.qmd
index 5becad4..7baa201 100644
--- a/README.qmd
+++ b/PHS7045_lab4.qmd
@@ -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"))