要做的case中需要批量读取一个文件夹中所有的tif文件,想要读取每一个并给予对应的变量名。
setwd("D:/case_age/data/wc2.1_10m_tavg")
all_td <- list.files(getwd())
前两步分别是设定工作目录和读取文件夹中所有文件,没有啥问题,而批量生成变量并赋值这一步出现了问题。
for (i in 1:length(all_td)){
result_i = readGDAL(all_td[i])
}
首先尝试了直接刚,只能输出一个结果显然不行。也搜不到在变量名中使用占位符的方法。
然后尝试先生成变量,然后再分配:
file_tname=paste("result",c(1:length(all_td)),sep="")
for (i in 1:length(all_td)){
file_tname[i] = readGDAL(all_td[i])
}
会出现如下报错:
这是因为读取的文件是空间数据,如果换成普通的数值就能正常执行。
在查询了诸多方法后,总算找到了个有用的方法:总算是能够成功运行了。核心就是eval函数和parse函数。在处理别的数据类型时,应该只要按照需要修改括号中的代码就能正常运行了。
参考网址: