What is the output of this code in R?

data(swiss)
par(mfrow=c(2,2))
fit <- lm(swiss$Fertility~.,data=swiss)
plot(fit)