Create Shapefiles in R