#HW09. Using the first 1000 observations from the stepdata dataset available in the olsrr library, perform a 10-fold cross validation to choose between the model that includes x1,x6 with the model that includes and x1,x2.x3. Which model would you choose using RMSE? by Rsquare? by MAE? Submit the output (no graphics needed) along with your answers. > librarylolser) > stepdata=stepdata[1:1000, 1 > nrow(stepdata) [1] 1000 > head(stepdata) x1 X2 x3 X4 X6 1 0.0826760 0.6320510-1.5645665 0.2454552 0.22465314 1.5486002 -1.531220 2 0.9686164 1.6813285 -1.2373614 0.3252530 -0.43283771 1.7114315 1.552297 3 0.5512325 0.3960668 0.5736233 1.9306180 2.77113567 -0.7371884 3.439711 4-0.6658940 -1.2176186 -1.0359124 -0.5909757 1.08636201 -0.8212630 -2.254428 5 0.2335480 -0.1381559 -1.1078434 -0.1763888 0.73432742 -0.2558896 - 1.350211 6-1.2116687 -1.0825696 -0.6065601 -0.3152895 -0.05950346 -0.4416865 -2.327600 x5