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 <- "9f7489899d373324_840060431001"
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 Oct. 13, 2023, 8:49 a.m.