Correlation from the Scatter Plot

data(tips, package = "reshape")
 ggally_cor(tips, mapping = ggplot2::aes_string(x = "total_bill", y = "tip"))

ggally_cor(
   tips,
   mapping = ggplot2::aes_string(x = "total_bill", y = "tip", size = 15, colour = "red")
 )

ggally_cor(
   tips,
   mapping = ggplot2::aes_string(x = "total_bill", y = "tip", color = "sex"),
   size = 5
 )

## Warning in stri_c(..., sep = sep, collapse = collapse, ignore_null =
## TRUE): longer object length is not a multiple of shorter object length

## Warning: The plyr::rename operation has created duplicates for the
## following name(s): (`colour`)