Ajuste del modelo polinomial a los datos en R

He leído las respuestas a esta pregunta y son bastante útiles, pero necesito ayuda especialmente en R. Tengo un conjunto de datos de ejemplo en R de la siguiente manera: x <- c(32,64,96,118,126,144,152.5,158) y <- c(99.5,104.8,108.5,100,86,64,35.3,15) Quiero ajustar un modelo a estos...