Merge branch 'bad-weather-TBS' of https://github.com/matsim-scenarios…

…/matsim-kelheim into bad-weather-TBS
matsim-scenarios · Jan 23, 2025 · 26c9440 · 26c9440
2 parents e22cee3 + 7e19862
commit 26c9440
Showing 1 changed file with 16 additions and 1 deletion.
diff --git a/src/main/R/badWeather/regressionAnalysis.R b/src/main/R/badWeather/regressionAnalysis.R
@@ -694,10 +694,25 @@ summary(test)
 confint(test)
 
 ############################################## first regression models for different time periods ####################################################################################################
-first_model_general <- lm(noRides ~ tavg+trend,data = result_data)
+first_model_general <- lm(noRides ~ wdir+tmax+tavg+tmin+snow+trend, data = result_data)
 summary(first_model_general)
 confint(first_model_general)
 
+AIC_first_model_general <- AIC(first_model_general)
+BIC_first_model_general <- BIC(first_model_general)
+
+first_model_tavg <- lm(noRides ~ wdir+tavg+snow+trend, data = result_data)
+summary(first_model_tavg)
+
+first_model_tmax <- lm(noRides ~ wdir+tmax+snow+trend, data = result_data)
+summary(first_model_tmax)
+
+first_model_tmin <- lm(noRides ~ wdir+tmin+snow+trend, data = result_data)
+summary(first_model_tmin)
+
+
+
+
 first_model_ioki <- lm(noRides ~ tavg+trend,data = ioki_data)
 summary(first_model_ioki)
 confint(first_model_ioki)