Create colorpI.R