pathShp <- list.files(system.file("extdata/shp", package = "wallace"),
full.names = TRUE)
nameShp <- list.files(system.file("extdata/shp", package = "wallace"),
full.names = FALSE)
xferUser <- xfer_userExtent(bgShp_path = pathShp, bgShp_name = nameShp,
userBgBuf = 1)
Run the code above in your browser using DataLab