if (FALSE) {
date <- lubridate::today()
## get minute by minute data
get_active_zone_minutes_intraday(detail_level = "15min")
## get more granular data
get_active_zone_minutes_intraday(detail_level = "1min")
}
Run the code above in your browser using DataLab