如何縮小netCDF文件的尺寸並更改數據？

Question

dimensions: 
    i1 = 3 ; 
    x = 11 ; 
    s1 = 1 ; 
    mid1 = 8 ; 
    mid2 = 8 ; 
variables: 
    double Height(i1,x) ; 
    double Temp(s1, x) ; 
    short Soil(s1, x) ; 
    double Liq(mid1, x) ; 

我有，我想減少尺寸mid1之一的大小和替換值的netCDF文件：

icond <- ncdf4::nc_open('dat.nc) 

#New dimensions for new file 
idim <- icond$dim[['i1']] 
xdim <- icond$dim[['x']] 
s1dim <- icond$dim[['s1']] 
mid1dim <- ncdim_def("mid1", "", 1:3) #3 layers 
mid2dim <- icond$dim[['mid2']] 

mv <- -9999 

#Get variable data 
Liqxdat <- ncvar_get(icond, 'Liq')[,1:3] #3 Layers 

#Define new variable 
Liqx = ncvar_def("Liq", "units", list(mid1dim, i1), mv, prec="double") 

#Create netCDF file 
nc = nc_create("test.nc", list(Height, Temp, Soil, Liqx) 

#Write data to the NetCDF file 
ncvar_put(nc, Liqx, Liqxdat) 

但是，這是不是給我在輸出文件中的任何數據。

Answer 1

不幸的是我無法運行你的代碼。所以我只能猜測它爲什麼不起作用。

1. 在行nc = nc_create（..）上缺少右括號。
2. 高度，溫度和土壤未定義。
3. 用nc_create你創建一個新文件，但是你不把數據添加到現有文件中，那是你想要的嗎？如果你想添加一個新的變量，你必須使用ncvar_add()