Displaying 1 result from an estimated 1 matches for "z3236814".
Did you mean:
323,814
2010 Sep 03
1
calculate monthly mean
...in month i want to
calculate the monthly mean for the time how can i make that , is there any function doing that
Thanks a lot
##load rgl package
library(rgl)
library(fields)
library(ncdf)
library(scatterplot3d)
## open binary file to read
nc <- open.ncdf("/srv/ccrc/data05/z3236814/mm5/co2/2000/q.200001.mon.nc")
v1 <- nc$var [[1]]
v2 <- nc$var [[2]]
v3 <- nc$var [[3]]
data1 <- get.var.ncdf(nc,v1)
data2 <- get.var.ncdf(nc,v2)
data3 <- get.var.ncdf(nc,v3)
coldat = data1[1:111,1:101,23,1:60]
## creat colour
hcol = cumsum(coldat)
coldat = hcol
hcol...