added a project file. and the salmon river

.gitignore

@@ -6,3 +6,4 @@ data/*
 
 #ignore the figure files
 figures/*
+.Rproj.user

USGS_NWIS.R

@@ -9,7 +9,8 @@ rivers <- read_csv(file = "river_IDs.csv", col_types = c("c", "c"))
 
 #rivers <- rivers %>% filter(names %in% c("Elwha"))
 #rivers <- rivers %>% filter(names %in% c("Duckabush"))
-#rivers <- rivers %>% filter(names %in% c("Hoh"))
+rivers <- rivers %>% filter(names %in% c("Salmon"))
+
 
 ifelse(!dir.exists(file.path(getwd(), "figures")), dir.create(file.path(getwd(), "figures")), FALSE)
 ifelse(!dir.exists(file.path(getwd(), "data")), dir.create(file.path(getwd(), "data")), FALSE)

USGS_NWIS.Rproj

@@ -0,0 +1,13 @@
+Version: 1.0
+
+RestoreWorkspace: Default
+SaveWorkspace: Default
+AlwaysSaveHistory: Default
+
+EnableCodeIndexing: Yes
+UseSpacesForTab: Yes
+NumSpacesForTab: 2
+Encoding: UTF-8
+
+RnwWeave: Sweave
+LaTeX: pdfLaTeX

river_IDs.csv

@@ -1,10 +1,11 @@
 names,siteNumber
-Yahara,05428500
+Yahara,5428500
-Des Plaines,05533600
+Des Plaines,5533600
-North Branch Chicago,05534500
+North Branch Chicago,5534500
 Elwha,12045500
 Wenatchee,12462500
 Snake,13013650
-Wisconsin,05407000
+Wisconsin,5407000
 Cedar,12119000
-Colorado,09380000
+Colorado,9380000
+Salmon,13317000