load(file = "rpm_xmap_speed.Rda")
load(file = "rpm_xmap_brake.Rda")
load(file = "brake_xmap_speed.Rda")
load(file = "brake_xmap_rpm.Rda")
load(file = "speed_xmap_rpm.Rda")
load(file = "speed_xmap_brake.Rda")
ccm_out_1 <- ccm_means(speed_xmap_rpm)
ccm_out_2 <- ccm_means(speed_xmap_brake)
ccm_out_3 <- ccm_means(brake_xmap_rpm)
ccm_out_4 <- ccm_means(brake_xmap_speed)
ccm_out_5 <- ccm_means(rpm_xmap_speed)
ccm_out_6 <- ccm_means(rpm_xmap_brake)