Plots the Density Plots by Using Diagonal

data(tips, package = "reshape")
 ggally_densityDiag(tips, mapping = ggplot2::aes(x = total_bill))

#data(movies)
 #ggally_densityDiag(movies, mapping = ggplot2::aes_string(x="rating"))
 #ggally_densityDiag(movies, mapping = ggplot2::aes_string(x="rating", color = "mpaa"))