R/unittest.R

In mlhutchins/fast-analytics: Fast Prototyping of Analysis Scripts

#' Unit Test
#'
#' Make all plots in one group, execute as function instead of passing.
#'
#' @export
#' @family skeletonPlots
#' @return Returns standard fast-analysis structured list
#' @examples
#' skeleton("edinburgh.R", 3138, plotUnitTest(), run = TRUE)
plotUnitTest <- function() {

    plotList <- list(
execRootscores, rootscoreBarChart, networkTechnologyBar,
callFailureBarChart, callFailureMap, twilioFailureMap, m2mFailureMap,
dataspeedBoxPlot,
downloadSuccessPlot, downloadAccessBoxPlot, downloadTaskBoxPlot, downloadTTFBBoxPlot, downloadTimeSeries,
uploadSuccessPlot, uploadAccessBoxPlot, uploadTaskBoxPlot, uploadTimeSeries,
emailSuccessPlot, emailAccessBoxPlot, emailTaskBoxPlot,
ldrSuccessPlot, ldrAccessBoxPlot, ldrTaskBoxPlot,
udpDropCDF, udpDropSizeCDF, udpLatencyCDF, udpLatencySizeCDF,
ltePowerTimeSeries,  ltePowerBoxPlot,
lteNoiseTimeSeries, lteNoiseBoxPlot,
temperatureTimeSeries, batteryTimeSeries
)
    return(plotList)

}