v <- terra::vect(system.file("extdata/cyl.gpkg", package = "tidyterra"))
v$grp <- rep(c("A", "B"), length.out = nrow(v))
v |>
reframe(value = c(min(as.double(cpro)), max(as.double(cpro))), .by = grp)
v |>
rowwise() |>
reframe(value = 1:2)
Run the code above in your browser using DataLab