fix scale_colour_hc in hc.R