Estadisticas descriptivas

library(ggplot2)
## Warning: package 'ggplot2' was built under R version 4.0.5
# str(iris)

# Diagrama de dispersión
grafica <- ggplot(iris, aes(Sepal.Length, Sepal.Width, color=Species))
grafica <- grafica + geom_point()
grafica

# Caja Bigote
grafica <- ggplot(iris, aes(Sepal.Length, Sepal.Width, color=Species))
grafica <- grafica + geom_boxplot()
grafica <- grafica + geom_point(alpha=0.3)
grafica <- grafica + facet_grid(.~Species)
grafica

# install.packages('GGally')
library(GGally)
## Warning: package 'GGally' was built under R version 4.0.5
## Registered S3 method overwritten by 'GGally':
##   method from   
##   +.gg   ggplot2
grafica <- ggparcoord(iris, columns = c(1:4), groupColumn = "Species", order = c(3,4,1,2))
grafica