LOTE 14

Resumen total

• Mortalidad S2: 4.65
• Edad de llegada: 71.45

##    Min. 1st Qu.  Median    Mean 3rd Qu.    Max. 
##   47.00   62.00   69.00   69.13   76.00   99.00

Resumen Engorde

##    Min. 1st Qu.  Median    Mean 3rd Qu.    Max. 
##   47.00   61.00   69.00   69.02   76.00   99.00

Mortalidad Predestete

ggplot(datos, aes(1:nrow(datos), Peso)) +
  geom_point(aes(col = Genetica))

ggplot(datos, aes(datos$Peso)) +
  geom_density(aes(fill = Genetica,col = Genetica, alpha = 0.1))

## Warning: Use of `datos$Peso` is discouraged. Use `Peso` instead.

ggplot(datos, aes(Genetica,Peso)) +
  geom_boxplot(aes(fill = Genetica))