Assigning a Coordinate Reference System CRS to a Shapefile in R