R 如何将光栅图像（如PBM）转换为CSV文件？

我正在尝试将PBM文件类型中的光栅图像转换为CSV文件

我试过这个：

setwd("~/Desktop/")
directory <- "test.pbm"
ndirectory <- "test.csv"

file_name <- list.files(directory, pattern = ".pbm")

files.to.read <- paste(directory, file_name) 
files.to.write <- paste(ndirectory, paste(sub(".pbm","", 
file_name),".csv"))

for (i in 1:length(files.to.read)) {
  temp <- (read.csv(files.to.read[i], header = TRUE, skip = 11, 
  fill = TRUE))
  write.csv(temp, file = files.to.write[i])
}

setwd（“~/Desktop/”）
目录通过设置path和full.names标志，可以获得src文件的绝对路径。
然后将“.pbm”替换为“.csv”，以便轻松获取目标文件名

试试这个

src_files <- list.files(path="~/Desktop/",pattern = ".pbm", full.names = TRUE)
dest_files <- sub(".pbm", ".csv", src_files)
for (i in 1:length(src_files)) {
  temp <- (read.csv(src_files[i], header = TRUE, skip = 11, fill = TRUE))
  write.csv(temp, file = dest_files[i])
}

src_文件Hi@abhilb！谢谢你的贡献！是否将要转换为csv的pbm文件的名称放在src_文件的路径中？我已经试过了，但仍然出现了“没有这样的文件或目录”的错误。还获取错误“未找到对象“True”。打印（src_文件）
oops.的输出是什么。。很抱歉，我之前已将模式设置为.json。。我现在已经更正了代码。检查它。当我打印src_文件时，我得到以下错误：list.files中的错误（path=“~/Desktop/”，pattern=“.pbm”，full.names=True）：对象“True”未找到我的错误，它必须是完整的。name=True。再次更新代码。您使用的是什么操作系统？