Error in exercise 3 in chapter 24.3

[andrewyimingchen]

Hi, jrnold,
I think there is a slight error in exercise 3 in chapter 24.3
https://jrnold.github.io/r4ds-exercise-solutions/model-building.html#exercise-24.3.3
"Comparing models, mod3 has a lower R^2 and regression standard error, ^σ, despite using fewer variables."
From the following code and result, wouldn't it be mod3 has a lower R^2 but higher sigma(regression standard error)?
glance(mod3) %>% select(r.squared, sigma, AIC, df)
#> # A tibble: 1 x 4
#> r.squared sigma AIC df
#>
#> 1 0.736 47.4 3863. 9

glance(mod2) %>% select(r.squared, sigma, AIC, df)
#> # A tibble: 1 x 4
#> r.squared sigma AIC df
#>
#> 1 0.757 46.2 3856. 21