Create selection.r