Semana2

# Instalamos las bases de datos por primera vez

if (!require("tidyverse")) {install.packages("tidyverse", dependencies=TRUE);library("tidyverse")}
if (!require("rmarkdown")) {install.packages("rmarkdown", dependencies=TRUE);library("rmarkdown")}
if (!require("readxl")) {install.packages("readxl", dependencies=TRUE);library("readxl")}
if (!require("psych")) {install.packages("psych", dependencies=TRUE);library("psych")}
if (!require("knitr")) {install.packages("knitr", dependencies=TRUE);library("knitr")}
if (!require("summarytools")) {install.packages("summarytools", dependencies=TRUE);library("summarytools")}
if (!require("yarrr")) {install.packages("yarrr", dependencies=TRUE);library("yarrr")}
if (!require("rio")) {install.packages("rio", dependencies=TRUE);library("rio")}
if (!require("WriteXLS")) {install.packages("WriteXLS", dependencies=TRUE);library("WriteXLS")}
if (!require("generalhoslem")) {install.packages("generalhoslem",dependencies=TRUE);library("generalhoslem")}
if (!require("car")) {install.packages("car", dependencies=TRUE);library("car")}
if (!require("bestNormalize")){install.packages("bestNormalize",dependencies=TRUE);library("bestNormalize")}
if (!require("emmeans")) {install.packages("emmeans", dependencies=TRUE);library("emmeans")}
if (!require("DescTools")) {install.packages("DescTools", dependencies=TRUE);library("DescTools")}
if (!require("ggcorrplot")) {install.packages("ggcorrplot", dependencies=TRUE);library("ggcorrplot")}
if (!require("corrplot")) {install.packages("corrplot", dependencies=TRUE);library("corrplot")}
if (!require("liver")) {install.packages("liver", dependencies=TRUE);library("liver")}
if (!require("geepack")) {install.packages("geepack", dependencies=TRUE);library("geepack")}
if (!require("datarium")) {install.packages("datarium", dependencies=TRUE);library("datarium")}
if (!require("ggpubr")) {install.packages("ggpubr", dependencies=TRUE);library("ggpubr")}
if (!require("stats")) {install.packages("stats", dependencies=TRUE);library("stats")}

Dataset

cancer_data <- read.csv ("cancer data for MOOC 1.csv")
cancer_data