Internal Axis Labeling Plot for ggpairs

data(tips, package = "reshape")
 ggally_diagAxis(tips, ggplot2::aes(x=tip))

ggally_diagAxis(tips, ggplot2::aes(x=sex))