v2.0.5

Updated release version.

.Rhistory

@@ -1,34 +1,3 @@
-,ContData.env$myThresh.Flat.Tolerance.AirTemp)
-#
-}##IF.myField.END
-#
-# B.6.03. WaterP
-myField <- ContData.env$myName.WaterP
-if(myField %in% myNames.DataFields.Present==TRUE){##IF.myField.START
-#
-myMsg.data <- "WaterP"
-myMsg <- paste("WORKING (QC Tests and Flags - ",myMsg.data,")",sep="")
-myItems.Complete <- myItems.Complete + 1
-myItems.Log[intCounter,2] <- myMsg
-fun.Msg.Status(myMsg, intCounter, intItems.Total, strFile)
-flush.console()
-#
-data.import <- fun.CalcQCStats(data.import
-,myField
-,ContData.env$myThresh.Gross.Fail.Hi.WaterP
-,ContData.env$myThresh.Gross.Fail.Lo.WaterP
-,ContData.env$myThresh.Gross.Suspect.Hi.WaterP
-,ContData.env$myThresh.Gross.Suspect.Lo.WaterP
-,ContData.env$myThresh.Spike.Hi.WaterP
-,ContData.env$myThresh.Spike.Lo.WaterP
-,ContData.env$myThresh.RoC.SD.period.WaterP
-,ContData.env$myThresh.RoC.SD.number.WaterP
-,ContData.env$myThresh.Flat.Hi.WaterP
-,ContData.env$myThresh.Flat.Lo.WaterP
-,ContData.env$myThresh.Flat.Tolerance.WaterP)
-#
-}##IF.myField.END
-#
 # B.6.04. AirP
 myField <- ContData.env$myName.AirBP
 if(myField %in% myNames.DataFields.Present==TRUE){##IF.myField.START
@@ -510,3 +479,34 @@ setwd(paste0("./",myLibrary))
 pkg <- "ContDataQC"
 library(pkg, character.only = TRUE)
 help(package=(pkg))
+# NEWS
+# Render then Copy NEWS so picked up in help
+rmarkdown::render("NEWS.rmd", "all")
+file.copy("NEWS.md", "NEWS", overwrite = TRUE)
+file.remove("NEWS.html")
+file.remove("NEWS.md")
+#
+# 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))
+pkg <- "ContDataQC"
+library(pkg, character.only = TRUE)
+help(package=(pkg))

DESCRIPTION

@@ -1,6 +1,6 @@
 Package: ContDataQC
 Title: Quality Control (QC) of Continous Monitoring Data
-Version: 2.0.4.9002
+Version: 2.0.5
 Authors@R: c(
 	person("Erik W.", "Leppo", email="[email protected]",role=c("aut","cre")),
 	person("Ann","Roseberry Lincoln", role="ctb"),

NEWS

@@ -3,7 +3,7 @@ NEWS-ContDataQC
 
 <!-- NEWS.md is generated from NEWS.Rmd. Please edit that file -->
 
-    #> Last Update: 2018-12-13 09:57:33
+    #> Last Update: 2018-12-13 10:06:49
 
 # Planned Updates
 
@@ -35,6 +35,12 @@ NEWS-ContDataQC
 
 # Version History
 
+## v2.0.5
+
+2018-12-13
+
+  - Revised release including vignette.
+
 ## v2.0.4.9002
 
 2018-12-13

NEWS.rmd

@@ -44,6 +44,11 @@ cat(paste0("Last Update: ",Sys.time()))
 
 # Version History
 
+## v2.0.5
+2018-12-13
+
+* Revised release including vignette.
+
 ## v2.0.4.9002
 2018-12-13