getwd()
library(rriskDistributions)
library(readxl)
CHORRILLO <- read_excel("C:/Users/malvi/OneDrive/Escritorio/PRUEBAS Y EXCELL_DATOS/CHORRILLO.xlsx",
sheet = "CHOR62", skip = 2)
View(CHORRILLO)
TEST3 <- select(CHORRILLO,TRASLADO)
TEST3 <- na.omit(TEST3)
View(TEST3)
TEST3 <- as.numeric(unlist(TEST3))
res3<-fit.cont(TEST3)