R - 提取地理参考光栅像素颜色答案

【问题标题】：R - extract georeferenced raster pixel colorR - 提取地理参考光栅像素颜色
【发布时间】：2013-10-13 00:04:08
【问题描述】：

我想使用 R 提取地理参考光栅图像的每个像素的颜色值。我需要这些像素颜色稍后绘制一个 tif（或 geotif），如上一个问题中所述（见R - original colours of georeferenced raster image using ggplot2- and raster-packages)。由于具有数据带的光栅图像不能隐式使用带值来为它们分配颜色（不能表示图案填充），我肯定需要这些像素颜色。我已经知道如何访问colortable，其中所有可能的 256 种颜色都列在一个向量中。但是，它们不是以这种形式映射的。这是我用来加载光栅图像并提取未映射的colortable的代码：

raster1 <- raster(paste(
       workingDir, "/HUEK200_Durchlaessigkeit001_proj001.tif",
       sep="", collapse=""))
raster1.pts <- rasterToPoints(raster1)
raster1.df <- data.frame(raster1.pts)
colTab <- attr(raster1, "legend")@colortable

感谢您的帮助！

【问题讨论】：

标签： r colors pixel raster

【解决方案1】：

我已经在我在这里的问题中引用的问题下发布了答案。该解决方案适用于两个问题线程，因此我在这里不完全重复：

R - original colours of georeferenced raster image using ggplot2- and raster-packages

事实证明，我的空间光栅图像对象的第一个数据带正好反映了颜色。我使用光栅中所有唯一可能值的向量来引用colTab 中的相应颜色。这不是直接可能的，因为从0 开始的值不是 R 中的有效索引。我只是引入了命名索引来应对它。现在，只有在valTab 中列出索引的颜色将作为colours 参数传递给缩放填充，并且绘制的结果是具有原始颜色的地理参考光栅图像。

【讨论】：