在R语言中如何使用readClipboard读取Windows剪贴板中的位图？

readClipboard返回NULL的核心原因是：指定format=2（对应DIB格式）时，raw=FALSE无法将二进制位图数据解析为文本；raw=TRUE能获取原始字节，但需要手动解析成可识别的图像格式。以下是具体解决方法：

方法1：手动处理DIB原始数据（base R + bmp包） #

DIB是设备无关位图，缺少标准BMP文件头，需先补全文件头再读取：

# 首次运行安装依赖包
install.packages("bmp")
library(bmp)

# 获取剪贴板中的DIB原始二进制数据
dib_raw <- readClipboard(format = "DIB", raw = TRUE)

# 构造BMP文件头（BITMAPFILEHEADER结构）
file_header <- raw(c(
  0x42, 0x4D,  # 标识BMP文件的"BM"字符
  as.raw((length(dib_raw) + 14) %% 256),  # 文件总大小的字节拆分（头+数据）
  as.raw((length(dib_raw) + 14) %/% 256),
  as.raw((length(dib_raw) + 14) %/% 65536),
  as.raw((length(dib_raw) + 14) %/% 16777216),
  0x00, 0x00, 0x00, 0x00,  # 保留位，固定为0
  0x36, 0x00, 0x00, 0x00   # 图像数据偏移量，固定为54（14字节头+40字节信息头）
))

# 合并文件头与DIB数据，写入临时BMP文件
bmp_full_data <- c(file_header, dib_raw)
temp_bmp <- tempfile(fileext = ".bmp")
writeBin(bmp_full_data, temp_bmp)

# 读取并显示图像
image <- read.bmp(temp_bmp)
plot(as.raster(image / 255))

方法2：用magick包简化处理 #

magick包支持自动识别多种图像结构，无需手动构造文件头：

# 首次运行安装依赖包
install.packages("magick")
library(magick)

# 获取DIB原始数据并写入临时文件
dib_raw <- readClipboard(format = "DIB", raw = TRUE)
temp_file <- tempfile(fileext = ".bmp")
# 补充空的文件头占位，magick会自动解析DIB结构
writeBin(c(raw(14), dib_raw), temp_file)

# 读取并显示图像
image <- image_read(temp_file)
print(image)

方法3：尝试读取bitmap格式 #

如果DIB处理仍有问题，可切换读取bitmap格式（对应format=1）：

bitmap_raw <- readClipboard(format = "bitmap", raw = TRUE)
# 后续处理同方法1或2，将原始数据转为BMP文件后读取即可

内容的提问来源于stack exchange，提问作者Seb