objetivo

construir un modelo de regresion simple, para observar el nivel de representatividad de las variables y predecir el resultado a nuevos valores.

Datos

Cargar librerias

library(ggplot2)
library(readr)
datos <- read.csv("https://raw.githubusercontent.com/rpizarrog/Industrias-4.0/main/datos/datos%20matemaicas%20ingles.csv")
datos
##    matematicas ingles
## 1         90.0   95.0
## 2         80.0   90.0
## 3         70.0   74.0
## 4         95.0   95.0
## 5         90.0   92.0
## 6         78.0   96.0
## 7         80.0   96.0
## 8         90.0   95.0
## 9         80.0   85.0
## 10        80.0   80.0
## 11        70.0   70.0
## 12        85.0   80.0
## 13        90.0   88.0
## 14        78.0   80.0
## 15        90.0   90.0
## 16        75.0   70.0
## 17        95.0   90.0
## 18        98.0   95.0
## 19        90.0   89.0
## 20        80.5   90.5
## 21        70.5   74.5
## 22        95.5   95.5
## 23        90.5   92.5
## 24        78.5   96.5
## 25        80.5   96.5
## 26        90.5   95.5
## 27        80.5   85.5
## 28        80.5   80.5
## 29        70.5   70.5
## 30        85.5   80.5
## 31        90.5   88.5
## 32        78.5   80.5
## 33        90.5   90.5