library(terra)
# SpatRaster method
spatrast <- rast(
crs = "EPSG:3857",
nrows = 10,
ncols = 10,
extent = c(100, 200, 100, 200),
nlyr = 6,
vals = seq_len(10 * 10 * 6)
)
spatrast %>% select(1)
# By name
spatrast %>% select(lyr.1:lyr.4)
# Rename
spatrast %>% select(a = lyr.1, c = lyr.6)
# SpatVector method
f <- system.file("extdata/cyl.gpkg", package = "tidyterra")
v <- vect(f)
v
v %>% select(1, 3)
v %>% select(iso2, name2 = cpro)
Run the code above in your browser using DataLab