data <- data.frame(x1=1,y1=2)
mapping <- aes(x = x1 + y1, y = y1) # default names: x and y
mapping
## List of 2
## $ x: language x1 + y1
## $ y: symbol y1
createdefaultmappinganddata(mapping,data)
## $mapping
## List of 2
## $ x: symbol x
## $ y: symbol y
## $data
## x y x1 y1
## 1 3 2 1 2
Run the code above in your browser using DataLab