0
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의 파일이 있습니다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)
을하지만이 출력 파일에 저에게 데이터를 제공하지 않습니다.