diff --git a/.Rhistory b/.Rhistory
index ebb8ce5..36be8f8 100644
--- a/.Rhistory
+++ b/.Rhistory
@@ -1,26 +1,3 @@
-myDir.create <- file.path(dir.output, "UserData")
-ifelse(dir.exists(myDir.create)==FALSE,dir.create(myDir.create),"Directory already exists")
-myDir.create <- file.path(dir.output, "Odd")
-ifelse(dir.exists(myDir.create)==FALSE,dir.create(myDir.create),"Directory already exists")
-myDir.create <- file.path(dir.output, "Raw")
-ifelse(dir.exists(myDir.create)==FALSE,dir.create(myDir.create),"Directory already exists")
-myDir.create <- file.path(dir.output, "RawFix")
-ifelse(dir.exists(myDir.create)==FALSE,dir.create(myDir.create),"Directory already exists")
-myDir.create <- file.path(dir.output, "DV")
-ifelse(dir.exists(myDir.create)==FALSE,dir.create(myDir.create),"Directory already exists")
-wd <- "C:\\Users\\Erik.Leppo\\OneDrive - Tetra Tech, Inc\\MyDocs_OneDrive\\NCEA_RMN\\Test_PeriodStats\\_TestFiles"
-#
-list.files(file.path(wd))
-library(ContDataQC)
-wd <- "C:\\Users\\Erik.Leppo\\OneDrive - Tetra Tech, Inc\\MyDocs_OneDrive\\NCEA_RMN\\Test_PeriodStats"
-#
-# function inputs
-myDate <- "2017-09-01"
-myDate.Format <- "%Y-%m-%d"
-myPeriod.N <- c(30, 60, 90, 120, 1)
-myPeriod.Units <- c("d", "d", "d", "d", "y")
-myFile <- "DV_211226000002a_Water_20160727_20170911_Water.Temp.C.CSV"
-myDir.import <- file.path(wd, "Data2_QC")
 myDir.export <- file.path(wd, "PeriodStats", "DV")
 myParam.Name <- "Water.Temp.C"
 myDateTime.Name <- "Date.Time"
@@ -510,3 +487,26 @@ devtools::install(myLibrary)
 library(myLibrary,character.only = TRUE)
 # change wd back to package
 setwd(paste0("./",myLibrary))
+# Library Name
+myLibrary <- "ContDataQC"
+# Load Library
+library(devtools)
+#~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
+# Create Package
+# create(myLibrary)
+#~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
+#
+#~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
+# Document, Install, and Reload Library
+## Generate Documentation
+setwd(paste0("./",myLibrary))
+devtools::document()
+## Install New Package (locally)
+setwd("..") # return to root directory first
+devtools::install(myLibrary)
+## Reload library
+library(myLibrary,character.only = TRUE)
+# change wd back to package
+setwd(paste0("./",myLibrary))
+library(ContDataQC)
+help(package="ContDataQC")
diff --git a/DESCRIPTION b/DESCRIPTION
index ec433ba..9c8f5ca 100644
--- a/DESCRIPTION
+++ b/DESCRIPTION
@@ -1,6 +1,6 @@
 Package: ContDataQC
 Title: Quality Control (QC) of Continous Monitoring Data
-Version: 2.0.1.9063
+Version: 2.0.2.0000
 Authors@R: c(
 	person("Erik W.", "Leppo", email="Erik.Leppo@tetratech.com",role=c("aut","cre")),
 	person("Ann","Roseberry Lincoln", role="ctb"),
diff --git a/NEWS.md b/NEWS.md
index d2c48a2..6416a1d 100644
--- a/NEWS.md
+++ b/NEWS.md
@@ -3,7 +3,7 @@ NEWS-ContDataQC
 
 <!-- NEWS.md is generated from NEWS.Rmd. Please edit that file -->
 
-    #> Last Update: 2018-01-31 10:23:54
+    #> Last Update: 2018-01-31 11:12:17
 
 # Planned Updates
 
@@ -38,9 +38,15 @@ NEWS-ContDataQC
 
 # Version History
 
+## v2.0.2
+
+2018-01-31
+
+  - Set release on GitHub.
+
 ## v2.0.1.9063
 
-2018-01-29
+2018-01-31
 
   - Updated ReadMe.
       - Provide links to “Guides”; training videos on YouTube with
diff --git a/NEWS.rmd b/NEWS.rmd
index f4b9ee5..fe6a89a 100644
--- a/NEWS.rmd
+++ b/NEWS.rmd
@@ -46,8 +46,13 @@ cat(paste0("Last Update: ",Sys.time()))
 
 # Version History
 
+## v2.0.2
+2018-01-31
+
+* Set release on GitHub.
+
 ## v2.0.1.9063
-2018-01-29
+2018-01-31
 
 * Updated ReadMe.
     + Provide links to "Guides"; training videos on YouTube with powerpoint slides and R Notebooks (with video files) on GitHub.