knitr::opts_chunk$set(
  collapse = TRUE,
  comment = "#>",
  fig.path = "man/figures/README-",
  out.width = "100%",
  dev = "ragg_png",
  dpi = 300
)

twriTemplates

twriTemplates status badge R build status codecov

This package provides:

Installation

The easiest way to install twriTemplates is through the r-universe repository:

options(repos = c(
  txwri = 'https://txwri.r-universe.dev',
  CRAN = 'https://cloud.r-project.org'))
install.packages("twriTemplates")

twriTemplates also lives on Github and can be built from source using:

install.packages("remotes")
remotes::install_github("TxWRI/twriTemplates")

Usage

Prerequisites

The Rmarkdown templates assume the required fonts are installed on your system. The Minion Pro font among others are used by the various templates and themes. We aren't licensed to distribute some of the fonts. Install all the fonts AgriLife provides at the Marketing and Communications branding website.

In order to use the pdf template, please install the tinytex package:

install.packages("tinytex")
tinytex::install_tinytex()
tinytex::is_tinytex()

Make sure the last function returns TRUE.

Templates

Create a new Rmarkdown document, select "From Template", and the TWRI PDF template and TWRI doc template will be available in the list.

Screenshot of rmarkdown template selector

A new .Rmd file will open with example text and guidance in the document.

Theme

ggplot themes are provided for print and powerpoint presentation. The main difference is that the fonts on the presentation styled theme are scaled larger to facilitate reading from the back row in an auditorium. There is also a function to add TWRI branding to your plots.

library(twriTemplates)
library(ggplot2)
library(dplyr)

## report theme
p1 <- dissolved_oxygen %>%
  mutate(station_id = as.factor(station_id)) %>%
  ggplot(aes(station_id, 
             min_do, 
             fill = station_id, 
             color = station_id)) +
  geom_boxplot(alpha = 0.5) +
  geom_jitter(alpha = 0.9, width = 0.1, height = 0) +
  theme_TWRI_print() +
  scale_color_discrete_twri(name = "Station ID") +
  scale_fill_discrete_twri(name = "Station ID") +
  labs(x = "Station ID", 
       y = "Dissolved Oxygen, Min [mg/L]", 
       title = "24-hr Minimum Dissolved Oxygen, Tres Palacios River",
       caption = "Source: TCEQ SWQM")
p1
## presentation theme
## suggested export size is 10 inches wide by 7.5 inches tall.
p2 <- dissolved_oxygen %>%
  mutate(station_id = as.factor(station_id)) %>%
  ggplot(aes(x = min_do, 
             fill = station_id, 
             color = station_id)) +
  geom_histogram(alpha = 0.5) +
  facet_wrap(~station_id) +
  theme_TWRI_pres() +
  scale_color_discrete_twri(name = "Station ID") +
  scale_fill_discrete_twri(name = "Station ID") +
  labs(x = "Dissolved Oxygen, Min [mg/L]",
       y = "n measurements",
       title = "24-hr Minimum Dissolved Oxygen, Tres Palacios River",
       caption = "Source: TCEQ SWQM") +
  theme(legend.position = "none")
p2
add_TWRI_logo(p2, scale = 0.2)

pkgdown

add/edit _pkgdown.yaml in the package root directory:

template:
  package: twriTemplates
  bootstrap: 5

navbar:
  type: dark
  bg: dark
  structure:
    right: [search, github]

add the following to the DESCRIPTION:

Config/Needs/website: TxWRI/twriTemplates


TxWRI/twriTemplates documentation built on Oct. 20, 2023, 2:06 p.m.