# NOT RUN {
## load the data
data(fpar)
data(par1)
data(tmin)
LUE_YIELD(fpar,par1,tmin,-2,12,3)
# }
# NOT RUN {
library(raster)
fparr <- raster(nc=2, nr=2)
values(fparr)<-runif(ncell(fparr),min =0.2,max= 0.8)
par11<- brick(nc=2, nr=2, nl=2)
values(par11)<-runif(ncell(par11),min =169076.9,max= 924474.6)
tminn <- brick(nc=2, nr=2, nl=2)
values(tminn)<-runif(ncell(tminn),min = 278,max= 281)
LUE_YIELD(fparr,par11,tminn,-2,12,3)
# }
Run the code above in your browser using DataLab