Create gg_color_hue.R