In the first case, you can see the info by
summary(lm(prestige ~ income, data = Prestige))
In the 2nd case, something similar will likely apply but I don't know that package or smoothing method. It's surely not as simple as a linear fit. Take a look at ?mgcv-FAQ
.