Better SpatialPolygonsDataFrame simplification in R