Compress sample data frame

Using raw data that has at least dateTime, value, code, populates the measured data portion of the Sample dataframe used in EGRET. ConcLow = Lower bound for an observed concentration ConcHigh = Upper bound for an observed concentration Uncen = 1 if uncensored, 0 if censored

Usage

compressData(data, verbose = TRUE)

Arguments

data

dataframe contains at least dateTime, code, value, columns in that order. If there are more than the initial date, code, value...it combines the data is combined as using interval censored concepts.

verbose

logical specifying whether or not to display progress message

Value

data frame returnDataFrame data frame containing dateTime, ConcHigh, ConcLow, Uncen

Examples

dateTime <- c('1985-01-01', '1985-01-02', '1985-01-03')
comment1 <- c("","","")
value1 <- c(1,2,3)
comment2 <- c("","<","")
value2 <- c(2,3,4)
comment3 <- c("","","<")
value3 <- c(3,4,5)
dataInput <- data.frame(dateTime, comment1, value1, 
      comment2, value2, 
      comment3, value3, stringsAsFactors=FALSE)
compressData(dataInput)
#>     dateTime code value comment2 value2 comment3 value3 ConcLow ConcHigh Uncen
#> 1 1985-01-01          1               2               3       6        6     1
#> 2 1985-01-02          2        <      3               4       6        9     0
#> 3 1985-01-03          3               4        <      5       7       12     0