R/utils.R
is.uy32721.Rd
This function test if an 'sf' object match with Uruguay at crs = 32721.
is.uy32721(x)
An 'sf' object with the same crs as the homonym parameter
logical value based in crs parameter of the sf object
# \donttest{
is.uy32721(load_geouy("Peajes"))
#> Reading layer `peajes' from data source
#> `https://geoservicios.mtop.gub.uy/geoserver/inf_tte_ttelog_terrestre/peajes/ows?service=WFS&request=GetFeature&typeName=peajes'
#> using driver `GML'
#> Simple feature collection with 18 features and 4 fields
#> Geometry type: MULTIPOINT
#> Dimension: XY
#> Bounding box: xmin: -58.24649 ymin: -34.78446 xmax: -54.42373 ymax: -31.54664
#> Geodetic CRS: WGS 84
#> Reading layer `ine_pais_corregido' from data source
#> `https://mapas.mides.gub.uy:443/geoserver/INECenso2004/ows?service=WFS&version=1.0.0&request=GetFeature&typeName=INECenso2004:ine_pais_corregido'
#> using driver `GML'
#> Simple feature collection with 1 feature and 1 field
#> Geometry type: MULTIPOLYGON
#> Dimension: XY
#> Bounding box: xmin: 366582.2 ymin: 6127919 xmax: 858252.1 ymax: 6671738
#> Projected CRS: WGS 84 / UTM zone 21S
#> [1] "Your object have 100% of matches with Ururguay CRS 32721"
# }