栅格数据文件夹的读取
可视化
library(terra) library(tidyverse) library(raster) tif_file_path <- list.files(r"(G:/centerqianyi/ndvi/aral)", pattern = ".tif$", full.names = TRUE, ignore.case = TRUE) print(tif_file_path) #我们通过stack()函数,将全部栅格图像的数据放入同一个变量中 tif_file_all <- stack(tif_file_path) tif_file_all plot(tif_file_all)#基于plot()函数,直接批量绘制多个图层各自的栅格图像。
简单可视化