Example - ContDataQC - QCRaw - Test4 dates off

[leppott]

The dates on the example and file don't match exactly.

Save example data (assumes directory ./Data1_RAW/ exists)

myData <- data_raw_test4_AW_20160418_20160726
write.csv(myData,paste0("./",Selection.SUB[1],"/test4_AW_20160418_20160726.csv"))

QC Raw Data (offset collection times for air and water sensors)

myData.Operation <- "QCRaw" #Selection.Operation[2]
myData.SiteID <- "test4"
myData.Type <- Selection.Type[3] #"AW"
myData.DateRange.Start <- "2016-04-28"
myData.DateRange.End <- "2016-07-26"
myDir.import <- file.path(myDir.BASE,Selection.SUB[1]) #"Data1_RAW"
myDir.export <- file.path(myDir.BASE,Selection.SUB[2]) #"Data2_QC"
myReport.format <- "html"
ContDataQC(myData.Operation, myData.SiteID, myData.Type, myData.DateRange.Start
, myData.DateRange.End, myDir.import, myDir.export
, fun.myReport.format=myReport.format)