##
## Call:
## lm(formula = `Environmental Quality` ~ Economy, data = final_data)
##
## Coefficients:
## (Intercept) Economy
## 3.0306 0.6025
The slope estimate of 0.603 (p-value < 0.0001) suggests that for an increase of one point in a Teleport urban areaโs economy score its environmental quality score increases on average by 0.603 points.
## `geom_smooth()` using formula 'y ~ x'
Hover over the circles on the map to view the environment and economy scores for each Teleport urban area. The scores tend to be similar.