将多个栅格写入不同的子文件夹

问题描述

我有一个86层的Large RasterBrick,并且我一直试图将每个RasterBrick保存在特定的子文件夹中,但没有成功。我只是可以通过参数bylayer = T将所有文件保存在同一父文件夹中。像这样的代表

library(raster)

wc <- getData("worldclim",var="bio",res=10)
writeraster(wc,"./test/wc.tif","GTiff",bylayer= T,suffix ="names")

但是我的数据中有86层,我需要每一层都留在自己的文件夹中。 我也尝试过此操作,因为在此reprex中考虑到每个层有19个子文件夹。但是这些图层仍被一起写在父文件夹中。

library(raster)


subfolder <- list.dirs(path= "./Results/subfolders/",full.names=TRUE,recursive=FALSE)

for(i in 1:nlayers(wc)) {
    final_rasters <- writeraster(wc,subfolder[i])
}

有人可以帮我吗?

谢谢

解决方法

暂无找到可以解决该程序问题的有效方法,小编努力寻找整理中!

如果你已经找到好的解决方法,欢迎将解决方案带上本链接一起发送给小编。

小编邮箱:dio#foxmail.com (将#修改为@)