Create GIS-CodeSegments1.R