Cparalel

Caja y Bigotes

library(ggplot2)

## Warning: package 'ggplot2' was built under R version 3.6.3

#obj ggplot 

plot <- ggplot(iris, aes(x=Sepal.Length, y=Sepal.Width)) 
plot <- plot + geom_boxplot(aes(group=Species, fill=Species, alpha=0.3))
plot <- plot + geom_point(aes(color=Species, alpha=0.3))
plot <- plot + facet_grid(.~Species)

# mostrar en pantalla
plot

plot <- ggplot(iris, aes(x=Species, y=Petal.Width)) 
plot <- plot + geom_boxplot(aes(group=Species, fill=Species, alpha=0.3))
plot <- plot + geom_point(aes(color=Species, alpha=0.3))

# mostrar en pantalla
plot

Coordenadas Paralelas

library(GGally)

## Warning: package 'GGally' was built under R version 3.6.3

## Registered S3 method overwritten by 'GGally':
##   method from   
##   +.gg   ggplot2

# creo objeto 
plot2 <- ggparcoord(iris,
                   columns= c(1:4),
                   groupColumn = "Species",
                   showPoints = TRUE
                   )
plot2

#facetas
plot2 <- plot2 + facet_grid(Species~.)
plot2