#Vamos a cargar la libreria
library(modeest)
library(readr)
# datos=read.csv("/cloud/project/datos/exams.csv")
datos1=read.csv("/cloud/project/datos/exams.csv")
head(datos1, 1)
## gender race.ethnicity parental.level.of.education lunch
## 1 male group A high school standard
## test.preparation.course math.score reading.score writing.score
## 1 completed 67 67 63
tail(datos1[,c(6,7,8)],10)
## math.score reading.score writing.score
## 991 67 55 53
## 992 87 93 88
## 993 69 63 66
## 994 58 54 58
## 995 86 82 75
## 996 73 70 65
## 997 85 91 92
## 998 32 35 41
## 999 73 74 82
## 1000 65 60 62
Se cargan los datos con la función read.csv() de la libreria readr previamente cargada
Datos<-read.csv(file = "https://raw.githubusercontent.com/rpizarrog/probabilidad-y-estad-stica/master/2023/datos/exams.csv")