powered by
zone_index(x, zbounds)
x
length(zbounds) + 1
data(cycling_data) cycling_data$zone <- zone_index(cycling_data$power.W, c(100, 200, 300))
Run the code above in your browser using DataLab