knitr::opts_chunk$set(
  collapse = TRUE,
  comment = "#>",
  warning = FALSE,
  message = FALSE,
  fig.width = 7,
  fig.height = 7
)

AirMonitorPlots provides functions to easily generate stylized plots of current data.

library(AirMonitor)
library(AirMonitorPlots)
# Load current Data
mts_monitor <- monitor_loadLatest()
# Set parameters
deviceDeploymentID <- "575243c65b9e4719_840160690012"
enddate <- lubridate::now()
startdate <- enddate - lubridate::ddays(7)

Timeseries

monitor_ggTimeseries(
  mts_monitor,
  startdate = startdate,
  enddate = enddate,
  id = deviceDeploymentID
)

Daily Barplots

monitor_ggDailyBarplot(
  mts_monitor,
  startdate = startdate,
  enddate = enddate,
  id = deviceDeploymentID
)

Diurnal (dailyByHour)

monitor_ggDailyByHour(
  mts_monitor,
  startdate = startdate,
  enddate = enddate,
  id = deviceDeploymentID
) 


MazamaScience/AirMonitorPlots documentation built on June 9, 2025, 12:38 p.m.