Data Analytics, Machine Learning, Business Analytics, Regression Analysis, Knowledgebase Analytics.
shapiro_test <- shapiro.test(residuals(linear_model)) print(shapiro_test) # output: W = 0.92792, p-value = 0.03427 # The p-value is less than the significance level of 0.05. # This indicates that when using only 'wt' and 'hp' as predictors, # the assumption of normally distributed residuals may be