Fitting polynomial model to data in R Fitting polynomial model to data in R r r