We can have our data that come in sequences:
phase_1 <- bikes[1:30, ] phase_2 <- bikes[1:60, ] phase_3 <- bikes
Bayes Rules! Figure 9.13
