0. 问题导入
目前，很多地理数据均存储为NetCDF格式（下简称NC格式），而往往内含多变量，不方便处理。其中，一种解决思路就是将NC格式文件中的多个变量数据转格式为单变量的GeoTiff文件（图1），进而进一步处理。
图1 技术路线
1. 示例数据
本示例数据格式为NC格式数据，内含7个变量。
ncfile = ncdf4::nc_open('L:\\JianShu\\2019-12-4\\data\\clmforc.Qian.c2006.T62.Solr.1972-01.nc')
names(ncfile$var)
[1] "EDGEE" "EDGEN" "EDGES" "EDGEW" "FSDS" "LATIXY" "LONGXY"
2. 将NC文件中的FSDS变量导入为raster
input_nc = 'L:\\JianShu\\2019-12-4\\data\\clmforc.Qian.c2006.T62.Solr.1972-01.nc'
varname = 'FSDS'
nc2raster = raster(input_nc, varname = varname)
3. 数据可视化检查(图2)
png("L:\\JianShu\\2019-12-4\\plot1.png",
height = 15,
width = 20,
units = "cm",
res = 1000)
print(levelplot(nc2raster))
dev.off()
图2 结果可视化检查
4. 结果写入GeoTiff文件
重点来啦，最重要的是要保证writeRaster 函数中的 overwrite 选项设置为 TRUE ，否则二次读取再存储系统会报错！
Error in .getGDALtransient(x, filename = filename, options = options, :
filename exists; use overwrite=TRUEError in .getGDALtransient(x, filename = filename, options = options, :
filename exists; use overwrite=TRUE
因此
output = 'L:\\JianShu\\2019-12-4\\FSDS.tif'
writeRaster(nc2raster, output, format = 'GTiff', overwrite = TRUE)
如果需要将Tiff转为NC文件，需要用raster/stack 函数读入栅格数据后，再用以下函数输出为NC数据：
intif = stack(output)
output_nc = 'L:\\JianShu\\2019-12-4\\FSDS.nc'
writeRaster(intif, output_nc, format = 'CDF',overwrite = TRUE)
5. 解决本示例问题所采用的R-packages
library(raster)
library(ncdf4)
library(rasterVis)
library(lattice)
6. 写在最后
大家平时在用R处理数据过程中有遇到什么问题，我们可以一起讨论鸭~
觉得本文对你有帮助的还麻烦您点个赞，或是评论有用，大家的支持是我持续更新的不竭动力！
