r - 需要帮助将 BMP 图像转换为 [R] 中的矩阵吗？

Question

我对 R 很陌生，我想知道是否有一种简单的方法可以将 BMP 图像转换为 R 中的矩阵。主要是，我正在寻找任何可以提供帮助的包。矩阵中每个元素的值将对应于颜色。

Answer 1

在 CRAN 包列表中搜索“bmp”会弹出bmp和其他一些，为简洁起见，我将只使用这个包。

library(bmp)
fl <- system.file("images", "5HT1bMARCM-F000001_seg001_lsm.bmp",  package = "bmp")
b <- read.bmp(fl)

此对象是一个数组，包含有关文件的一些信息：

 str(b)
 int [1:206, 1:206, 1:3] 107 111 119 123 115 119 119 139 143 143 ...
 - attr(*, "header")=List of 13
  ..$ filesize     : num 127774
  ..$ offset       : num 54

这是一个 3D 数组：

dim(b)
[1] 206 206   3

有一个as.raster函数，它接受一个可选max参数：

m <- as.raster(b, max = 255)

这个矩阵m现在是一个二维颜色矩阵（十六进制）。

str(m)
 'raster' chr [1:206, 1:206] "#6B0303" "#6F0303" "#770303" ...


dim(m)
[1] 206 206

让我们绘制这个东西，我们需要设置一个绘图，然后找出它的范围，这样我们就可以用我们的图像填充设备。

plot(1, type = "n", axes = FALSE, xlab = "", ylab = "")
usr <- par("usr")
rasterImage(m, usr[1], usr[3], usr[2], usr[4])

您的需求将取决于 BMP 文件使用的存储选项以及用于读取它的软件。

还有其他选项，包括readbitmappackage 和 with rgdal（也许还有 via raster），但这取决于你可以在你的机器上安装什么。