From cd5710d42aa8a590adbc178e72f87fe70756c7e8 Mon Sep 17 00:00:00 2001
From: Ranae Dietzel <ranae.dietzel@gmail.com>
Date: Tue, 27 Jun 2017 14:50:18 -0500
Subject: [PATCH 1/2] Added _data folder

---
 _data/hydrogroup.rds | Bin 0 -> 301 bytes
 1 file changed, 0 insertions(+), 0 deletions(-)
 create mode 100644 _data/hydrogroup.rds

diff --git a/_data/hydrogroup.rds b/_data/hydrogroup.rds
new file mode 100644
index 0000000000000000000000000000000000000000..d14ccea2c7ad72c9c48e37362ffa5e0b53e59e88
GIT binary patch
literal 301
zcmV+|0n+{-iwFP!0000028-ZgU|?WkU}k1wU}6R`nT0_F5c2`ChW!TyFmPai(i~7)
z078$-<Cg~l5KDuBg@F@DGddE%a3X@?Oa#M)FoW4q--!gKGYL!=qM1$zZA36#h-Nwy
z!-S@D2fqeLyahnxFAzo_fY3pZ7<LGTiif~xsC)=iJ`^e*2BQz4iiaLR6%U8m3*`qw
z`9V-R*a6KQF!2UddxI39^aH3olnz;dY7WfZ=<W%IstZYgibLrz1ypn3;!rvqBG16U
z!UQB3p+U=8lwYowmzbMc4CL?vF%!tS|NsBLfu@iZrbvJRRO&zkxr%f03sU2g^HWk`
zA{mt_MfvGP`K1N$$n!HoH!C?Ou^46+Opq%ju_RG1tq5ohkoOM&%yJNJ?gRh;J>z&%

literal 0
HcmV?d00001


From b48a373ca3b24519e5190593a2711fb6b0898b75 Mon Sep 17 00:00:00 2001
From: Ranae Dietzel <ranae.dietzel@gmail.com>
Date: Tue, 27 Jun 2017 15:07:35 -0500
Subject: [PATCH 2/2] Couldn't find "select", added dplyr::select

---
 _code/download_ssurgo.R | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

diff --git a/_code/download_ssurgo.R b/_code/download_ssurgo.R
index 53ac6c2..810f3a8 100644
--- a/_code/download_ssurgo.R
+++ b/_code/download_ssurgo.R
@@ -175,7 +175,7 @@ download_SSURGO <- function(SiteName = "field2",
       soil$layer <- .bincode(soil$center, breaks=c(-1,soilLayer_breaks[soilLayer_breaks>0]))
       
       soil %>%
-        select(-hydrogroup) %>%
+        dplyr::select(-hydrogroup) %>%
         group_by(layer) %>%
         mutate(thick = (max(center)-min(center))*10) %>%
         summarise_all("mean") -> soil
@@ -195,5 +195,5 @@ download_SSURGO <- function(SiteName = "field2",
 }
 
 ### Example 
-#soils <-  download_SSURGO(SiteName = "field2",north=42.010759,south=42.01000,east=-93.740682,west=-93.741712)
-#View(soils[2])
+soils <-  download_SSURGO(SiteName = "field2",north=42.010759,south=42.01000,east=-93.740682,west=-93.741712)
+View(soils[2])