Create CSI.R