``` r library(sf) #> Linking to GEOS 3.5.0, GDAL 2.1.2, proj.4 4.9.3 library(maps) world1 <- sf::st_as_sf(map('world', plot = FALSE, fill = TRUE)) world2 <- st_transform(world1, "+proj=laea +y_0=0 +lon_0=155 +lat_0=-90 +ellps=WGS84 +no_defs") plot(world2, graticule = st_crs(4326), axes = TRUE) #> Warning in min(lat): no non-missing arguments to min; returning Inf #> Warning in max(lat): no non-missing arguments to max; returning -Inf #> Error in seq.default(bb[2], bb[4], length.out = ndiscr): 'from' cannot be NA, NaN or infinite ```