Return the package the input object is based on

Detect whether the input object is sf or Spat* object.

Usage

dep_check(input)

Arguments

input

Spat* in terra or sf object.

Value

A character object; one of "terra" and "sf"

See also

Other Helper functions: any_class_args(), clip_ras_ext(), clip_vec_ext(), crs_check(), datamod(), dep_switch(), ext2poly(), get_clip_ext(), is_bbox_within_reference(), is_within_ref(), par_def_q(), reproject_b2r(), reproject_std(), vect_valid_repair()

Author

Insang Song

Examples

library(sf)
library(terra)
options(sf_use_s2 = FALSE)

nc_path <- system.file("gpkg/nc.gpkg", package = "sf")
nc_sf <- sf::st_read(nc_path)
#> Reading layer `nc.gpkg' from data source 
#>   `/home/runner/work/_temp/Library/sf/gpkg/nc.gpkg' using driver `GPKG'
#> Simple feature collection with 100 features and 14 fields
#> Geometry type: MULTIPOLYGON
#> Dimension:     XY
#> Bounding box:  xmin: -84.32385 ymin: 33.88199 xmax: -75.45698 ymax: 36.58965
#> Geodetic CRS:  NAD27
dep_check(nc_sf)
#> [1] "sf"
nc_vect <- terra::vect(nc_sf)
dep_check(nc_vect)
#> [1] "terra"
## END OF EXAMPLE