ggMarginal
ggMarginalGadget(plot)
ggExtraPlot
if (interactive()) { plot <- ggplot2::ggplot(mtcars, ggplot2::aes(wt, mpg)) + ggplot2::geom_point() plot2 <- ggMarginalGadget(plot) }
Run the code above in your browser using DataCamp Workspace