This function calculates daily linear model values between the pm25_A and pm25_B channels. A daily r-squared value is returned in addition to the coefficients of the linear fit (slope and intercept)

PurpleAirSoH_dailyABFit(pat = NULL)

Arguments

pat

PurpleAir Timeseries pat object.

Examples

 
library(AirSensor)

tbl <- 
  example_pat %>%
  PurpleAirSoH_dailyABFit() 
  
names(tbl)
#> [1] "datetime"                "pm25_A_pm25_B_rsquared" 
#> [3] "pm25_A_pm25_B_slope"     "pm25_A_pm25_B_intercept"
  
timeseriesTbl_multiPlot(
  tbl, 
  parameters = c("pm25_A_pm25_B_rsquared", "pm25_A_pm25_B_slope"),
  ylim = c(-1,1)
)