r - 如何将特定颜色传输到 r 中的栅格

Question

我想知道是否可以为 r 中的栅格单元分配特定颜色。

我知道“栅格”包中的“栅格化”允许将值传输到给定给定值坐标的栅格。但是，我想知道是否可以只将一种颜色转移到单元格的特定位置？

简而言之，我有一个给定的栅格和一个包含三列(x、y 和颜色)的外部数据库。我想将第三列中的颜色转移到栅格中 x-y 位置的单元格。

这是我的代码:

library(raster)

BaseRaster<-raster(xmn=1, xmx=4, ymn=1, ymx=4,resolution=1) #create an empty raster

Database<-data.frame(Xcols=c(1.5, 2.5,3.5,   1.5, 2.5,3.5,  1.5, 2.5,3.5) ,
Ycols= c(1.5, 1.5,1.5,   2.5, 2.5,2.5,  3.5, 3.5,3.5),
Cols=c("#FFF423","#FFFF14","#FFE20F","#FFF80A","#FFCB07","#FFE100","#FFEE0B","#FDEE0A","#FFE209"))

问题是，在给定数据库中第 1 列和第 2 列中提供的坐标的情况下，如何将数据库第三列中的颜色传输到栅格？不幸的是，光栅化不能完成这项工作

ColorRaster= rasterize(c(Database$Xcols, Database$Ycols), BaseRaster, Database $Cols)

Answer 1

假设 BaseRaster 是您的栅格对象并且数据库具有以下颜色应该有效:

plot(BaseRaster, col=colorRampPalette(database$color))(255)

更多信息请引用 plot{raster}