将栅格图中的可变标签/图例更改为离散字符

Question

我刚刚用栅格数据绘制了一个由6种不同的土地类型组成的地块，并将它们与多边形向量相匹配。我试图将连续标度栏(1-6)上的值更改为每种土地类型(例如草原、城市等)的名称，这是每种不同颜色所代表的。我尝试过插入断点，但是图例中的每个框都包含标签(1-2，2-3，3-4等) 栅格图，每种不同的颜色代表不同的土地类型。

这是我的代码：栅格多角体编码

Answer 1

示例数据

library(terra)
r <- rast(nrows=10, ncols=10)
values(r) <- sample(3, ncell(r), replace=TRUE)
cover <- c("forest", "water", "urban")

你可以这样做：

plot(r, type="classes", levels=cover)

或者首先让光栅分类

levels(r) <- data.frame(id=1:3, cover=c("forest", "water", "urban"))
plot(r)