# NOT RUN {
### First generate a list with the scales
scales <- list(scale1 = c('mpg', 'cyl'), scale2 = c('disp', 'hp'));
### Create the scales and add them to the dataframe
makeScales(mtcars, scales);
# }
Run the code above in your browser using DataCamp Workspace