5

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

4

1 回答 1

7

在 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 文件使用的存储选项以及用于读取它的软件。

R bmp 包中的基本图像图

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

于 2013-05-28T09:22:46.040 回答