diff --git a/R/az_hourly.R b/R/az_hourly.R index 5369b5b..c8e2e5d 100644 --- a/R/az_hourly.R +++ b/R/az_hourly.R @@ -88,7 +88,7 @@ az_hourly <- function(station_id = NULL, start_date_time = NULL, end_date_time = # If most recent hour is queried, make sure only one hour is returned if (is.null(start_date_time) & is.null(end_date_time)) { out <- - out |> + out %>% dplyr::filter(.data$date_datetime == max(.data$date_datetime), .by = "meta_station_id") }