Calculates the coefficient of determination for any model of class 'lm'.
Rsq(model)
model
y
fitted
cor