In USGS-R/repgen: USGS internal report generation

wzxhzdk:0

## `r fetchReportMetadataField(data,'title')` Report

**Location:** `r data[['reportMetadata']][['stationId']]` - `r data[['reportMetadata']][['stationName']]` `r if(!isEmptyOrBlank(data[['reportMetadata']][['primarySeriesLabel']])) {paste("**Selected Time Series:**", data[['reportMetadata']][['primarySeriesLabel']])}` `r if(!isEmptyOrBlank(data[['reportMetadata']][['firstStatDerivedLabel']])) {paste("**Stat Derived Time Series 1:**", data[['reportMetadata']][['firstStatDerivedLabel']])}` `r if(!isEmptyOrBlank(data[['reportMetadata']][['secondStatDerivedLabel']])) {paste("**Stat Derived Time Series 2:**", data[['reportMetadata']][['secondStatDerivedLabel']])}` `r if(!isEmptyOrBlank(data[['reportMetadata']][['thirdStatDerivedLabel']])) {paste("**Stat Derived Time Series 3:**", data[['reportMetadata']][['thirdStatDerivedLabel']])}` `r if(!isEmptyOrBlank(data[['reportMetadata']][['fourthStatDerivedLabel']])) {paste("**Stat Derived Time Series 4:**", data[['reportMetadata']][['fourthStatDerivedLabel']])}`

**Period:** `r as.Date(data[['reportMetadata']][['startDate']])` to `r as.Date(data[['reportMetadata']][['endDate']])` **Created:** `r sprintf("%s (%s)", Sys.time(), Sys.timezone())` `r if (length(author) != 0) { paste("**Author:**",author[[1]]) }` `r if (length(author) == 0) { paste("**Author:** Username") }`

r if(fetchReportMetadataField(data, 'excludeMinMax') || fetchReportMetadataField(data, 'excludeDiscrete')) {paste("**Advanced Options:**") } r if(fetchReportMetadataField(data, 'excludeMinMax')){ paste("Max/min instantaneous values excluded from plot.") } r if(fetchReportMetadataField(data, 'excludeDiscrete')){ paste("Discrete data excluded.") }

---

plot5yr <- createfiveyeargwsumPlot(data)
if (!is.null(plot5yr)) {
  printReportFeature(plot5yr)
}

r if(is.null(plot5yr)) {paste("The dataset requested is empty.")}

r getSimsUrl(data[["simsUrl"]])

r getWaterDataUrl(data[["waterdataUrl"]])

r printVersionStrings()

USGS-R/repgen documentation built on April 14, 2021, 2:47 p.m.