Add new aes

Description

Add new aesthetics to a previous aes.

Usage

addAndOverwriteAes(current, new)

Value

aes_string output

Author(s)

Barret Schloerke schloerke@gmail.com

Examples

data(diamonds, package="ggplot2")
 diamonds.samp <- diamonds[sample(1:dim(diamonds)[1],1000),]
 ggpairs(diamonds.samp, columns = 5:7,
  upper = list(continuous = "cor", aes_string = ggplot2::aes_string(color = "clarity")),
  lower = list(continuous = "cor", aes_string = ggplot2::aes_string(color = "cut")),
  color = "color",
  title = "Diamonds Sample")