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