There are many sources of water quality monitoring data including instruments (ex: YSI instruments) and open source data sets (ex: USGS and NDBC), all of which are susceptible to errors/inaccuracies due to drift. driftR provides a grammar for cleaning and correcting these data in a “tidy”, reproducible manner.
The easiest way to get driftR is to install it from CRAN:
install.packages("driftR")You can also install the development version of driftR from Github with devtools:
# install.packages("devtools")
devtools::install_github("shaughnessyar/driftR")The driftR package implements a series of equations used in Dr. Elizabeth Hasenmueller’s hydrology and geochemistry research. These equations correct continuous water quality monitoring data for incremental drift that occurs over time after calibration. There are two forms of corrections included in the package - a one-point calibration and a two-point calibration. One-point and two-point calibration values are suited for different types of measurements. The package is currently written for the easiest use with YSI multiparameter Sonde V2 series products.
The figure below illustrates the difference in chloride values between the uncorrected data and the same data with the drift corrections implemented by driftR applied. Note that the uncorrected data drifts to higher values over time. driftR uses calibration data to correct this drift.
As shown, continuous water quality instruments drift over time, so it becomes necessary to correct the data to maintain accuracy. driftR provides four verbs for applying these corrections in a consistent, reproducible manner: read, factor, correct, and drop. These verbs are designed to be implemented in that order, though there may be multiple applications of correct for a given data set. All of the core functions for driftR have the dr_ prefix, making it easy to use them interactively in RStudio.
The following example shows a simple workflow for applying these verbs to some hypothetical data:
# load the driftR package
library(driftR)
# import data exported from a Sonde
waterTibble <- dr_readSonde(file = "data.csv", define = TRUE)
# calculate correction factor and keep dateTime var
# results stored in new vector corrFac and dateTime
waterTibble <- dr_factor(waterTibble, corrFactor = corrFac, dateVar = Date,
timeVar = Time, format = "MDY", keepDateTime = FALSE)
# apply one-point calibration to SpCond;
# results stored in new vector SpConde_Corr
waterTibble <- dr_correctOne(waterTibble, sourceVar = SpCond, cleanVar = SpCond_Corr,
calVal = 1.07, calStd = 1, factorVar = corrFac)
# apply two-point calibration to pH;
# results stored in new vector pH_Corr
waterTibble <- dr_correctTwo(waterTibble, sourceVar = pH, cleanVar = pH_Corr,
calValLow = 7.01, calStdLow = 7, calValHigh = 11.8,
calStdHigh = 10, factorVar = corrFac)
# drop observations to account for instrument equilibration
waterTibble <- dr_drop(waterTibble, head=10, tail=5)%>%All of the core functions return tibbles (or data frames) and make use of the tidy evaluation pronoun .data, so using them in concert with the pipe (%>%) is straightforward:
# load the driftR package
library(driftR)
# import data exported from a Sonde
waterTibble <- dr_readSonde(file = "sondeData.csv", define = TRUE)
# caclulate correction factors, apply corrections, and drop observations
waterTibble <- waterTibble %>%
dr_factor(corrFactor = corrFac, dateVar = Date, timeVar = Time, format = "MDY",
keepDateTime = TRUE) %>%
dr_correctOne(sourceVar = SpCond, cleanVar = SpCond_Corr, calVal = 1.07,
calStd = 1, factorVar = corrFac) %>%
dr_correctTwo(sourceVar = pH, cleanVar = pH_Corr, calValLow = 7.01, calStdLow = 7,
calValHigh = 11.8, calStdHigh = 10, factorVar = corrFac) %>%
dr_drop(head=10, tail=5)See the package website for more information on these functions and a detailed vignette describing how to get started with driftR.
An additional vignette describes driftR’s use of tidy evaluation and how to implement pipes into data cleaning in greater detail. Building on that article, we also provide some introductory examples for how to use tidyr, ggplot2, and several other R packages to conduct some initial exploratory data analysis of driftR output. Finally, we provide a fourth vignette designed for users of non-YSI Sonde multiparameter V2 series instruments who wish to use driftR with their data.
You can also view the help files from within R:
?dr_readSondeIf driftR does not seem to be working as advertised, please help us creating a reproducible example, or reprex, that makes it easy to get help.
install.packages("reprex")
library("reprex")After loading the reprex package, copy some code to your clipboard that includes the library() functions, the process you used (ideally simplified), and the functions that are creating issues. Once the material is copied, you can use reprex() to format your example:
reprex()Your clipboard will now contain a nicely formatted set of output that you can copy and paste into a GitHub Issue to describe your problem.
dr_read FunctionsWe are interested in expanding the built-in capabilities of driftR to read in water quality data from other sources. We are currently working on a function for YSI Exo Multiparameter Sonde output. If you have some sample data (~500 observations are ideal) from another model or brand of instrument and are willing to share it, please reach out to one of the package authors or, better yet, open an Issue. If you have some R skills and want to write the function yourself, feel free to fork driftR, make your edits, and then open a pull request.
Please note that this project is released with a Contributor Code of Conduct. By participating in this project you agree to abide by its terms.
Andrew Shaughnessy led the development of this package. He is a senior at Saint Louis University majoring in Chemistry and Environmental Science.
Christopher Prener, Ph.D. assisted in the development of this package. He is an Assistant Professor in the Department of Sociology and Anthropology at Saint Louis University. He has a broad interest in computational social science as well as the development of R packages to make research more reproducible and to generalize research code.
Elizabeth Hasenmueller, Ph.D. developed the original equations that this package implements and provided the example data. She is an Assistant Professor in the Department of Earth and Atmospheric Science at Saint Louis University.