removed comment

workspace/02_NHD_navigate.Rmd

@@ -116,7 +116,7 @@ if(all(is.na(tmp_POIs$Type_Gages))) {
   streamgages <- streamgages_VPU %>% 
     group_by(COMID) %>%
     # If multiple gages per COMID, pick one with highest rank as rep POI_ID
-    filter(gage_score == max(gage_score))#, !is.na(drain_area)) %>%
+    filter(gage_score == max(gage_score), !is.na(drain_area)) %>%
     ungroup() %>%
     select(COMID, site_no)