从多层tiff文件中将带提取为单独的层

问题描述

我有一个tiff文件，其中包含6个频段Data link，我使用了所有方法来提取[请参见此处] [2] [请参见此处2] [3]所有6个频段都作为单独的图层，但是无法提取它们作为单个文件。

library(raster)
library(ncdf4)
library(rgdal)
r <- raster("E:/TRY/bands.tif")
writeraster(r,paste0(names(r),".tif"),bylayer=TRUE,format="GTiff")

我只有一个tif文件，该文件没有任何信息，就像它是什么一样。

感谢任何帮助

谢谢

解决方法

尝试使用功能raster::stack。这将读取所有层。

library(raster)
library(ncdf4)
library(rgdal)
s1 <- stack("~/Downloads/bands.tif")
writeRaster(s1,paste0(names(s1),".tif"),bylayer=TRUE,format="GTiff")