Demonstrate scales functions with ggplot2 code

This function generates ggplot2 code needed to use scales functions for real code.

demo_scale(x, ...)

Arguments

x	A vector of data
...	Other arguments pass to scale functions