# Simulate 1 day of cadence values (1440 minutes)
set.seed(123)
cad <- sample(0:150, size = 1440, replace = TRUE)
out <- get_cadence_bands(cad)
out$minutes # minutes in each band
out$steps # steps in each band
Run the code above in your browser using DataLab