
Flexible Flow Normalization Plot Add On
flexPlotAddOn(eList, showArrows = TRUE, showRect = TRUE, customPalette = NULL)
named list with at least the Daily, Sample, and INFO dataframes
logical whether or not to show arrows representing flow segments
logical whether or not to show rectangles representing sample segments
character vector of colors as a hexadecimal string of the form "#rrggbb". Defaults to NULL, which indicates the use of a default palette (up to 21 segments).
eList <- Choptank_eList
eList <- setUpEstimation(eList)
flowNormStart <- c("1979-10-01","1990-01-01","1992-10-10")
flowNormEnd <- c("1995-06-06","2004-03-03","2011-09-29")
flowStart <- c("1979-10-01","1995-06-07","2004-03-04")
flowEnd <- c("1995-06-06","2004-03-03","2011-09-29")
dateInfo <- data.frame(flowNormStart,
flowNormEnd,
flowStart,
flowEnd,
stringsAsFactors = FALSE)
# \donttest{
newEList <- flexFN(eList, dateInfo)
plotFluxHist(newEList)
flexPlotAddOn(newEList)
plotFluxHist(newEList)
flexPlotAddOn(newEList, customPalette=c("#d5ce48", "#fd300f", "#3e0289"))
# }
Run the code above in your browser using DataLab