玩转栅格数据:在 R 中实现坐标系与分辨率的完美统一
使用 R 进行栅格数据处理:投影与重采样
在地理信息系统(GIS)分析中,处理栅格数据是一个常见且重要的任务。本文将介绍如何使用 R 语言中的 raster 和 rgdal 包,进行栅格数据的投影和重采样,确保不同数据源之间的一致性。
1. 介绍
在遥感和环境监测领域,栅格数据经常来自不同的来源,可能会有不同的坐标系统和分辨率。在进行分析之前,通常需要将这些数据统一到一个参考栅格文件中。本文将展示一个简单的 R 代码示例,帮助读者实现这一目标。
2. 所需库
在开始之前,请确保你已经安装了以下 R 包:
3. 代码解析
以下是我们将要使用的 R 代码:
input_folder <- "E:\\invest\\00"
output_folder <- "E:\\invest\\输出"
reference_raster <- "E:/invest/统一.tif"
ref_raster <- raster(reference_raster)
raster_files <- list.files(input_folder, pattern = "\\.tif$", full.names = TRUE)
for (file in raster_files) {
ras <- raster(file)
ras_wgs <- projectRaster(ras, crs = crs(ref_raster))
ras_resampled <- resample(ras_wgs, ref_raster, method = "bilinear")
ras_final <- setExtent(ras_resampled, extent(ref_raster), keepres = TRUE)
o