Convenience function for nrow(pat$data) == 0.
This makes for more readable code in functions that need to test for this.
pat_isEmpty(pat)pat object
TRUE if no data exist in pat, FALSE otherwise.
library(AirSensor2)
pat_isEmpty(example_pat)
#> [1] FALSE