v <- terra::vect(system.file("extdata/cyl.gpkg", package = "tidyterra"))
v$grp <- rep(c("A", "B"), length.out = nrow(v))
group_nest(v, grp)
nest_by(v, grp)
# Convert to a named SpatVectorCollection.
nested <- group_nest(v, grp)
sv <- pull(nested, data)
names(sv) <- pull(nested, grp)
terra::svc(sv)
Run the code above in your browser using DataLab