tarea 3

#informe tarea 3

df <- read.csv("most_valuable_teams (1).csv")
# Cargar archivo csv
datos <- read.csv("most_valuable_teams (1).csv")

# Crear histograma
hist(datos$Age, main="Club", xlab="Age", ylab="Competition")

# Crear diagrama de cajas
boxplot(datos[, c("Age", "Squad_size")], 
        main="Distribuciones de mis variables", 
        names=c( "Age", "Squad_size"), 
        ylab="Valores")