R语言实现气象数据与作物面积数据尺度匹配

# 加载所需的包
library(raster)
library(rgdal)

# 设置工作目录
setwd('your_working_directory')

# 读取数据1和数据2
data1 <- brick('data1.nc')
data2 <- raster('data2.tif')

# 将数据1匹配到数据2的尺度上
data1_resampled <- resample(data1, data2, method = 'bilinear')

# 输出数据1和数据2的尺度
print(resolution(data1_resampled))
print(resolution(data2))

# 保存匹配后的数据1
writeRaster(data1_resampled, 'data1_resampled.tif', format = 'GTiff', overwrite = TRUE)