Displaying 1 result from an estimated 1 matches for "imgrast".
Did you mean:
imgraster
2010 Oct 06
1
R getting slower until it breaks...
...]],ncol=VALUE[[3]], byrow=TRUE)
NDVImatrix <- NDVImatrix + 1
NDVImatrix <- NDVImatrix * (255/2)
return(NDVImatrix)
}
#################################################################################
## Fonction 1b - Faire le tiff
make.tiff<- function(NV=newValues,TT=Type,img=imgRaster,nom){
pixelNDVIMatrix <- calculate_NDVI(TT,img,NV[c(1,2,3)])
newRaster <- raster(pixelNDVIMatrix)
NAvalue(newRaster)<-999999
nnom<-nom[NV[4]]
writeRaster(newRaster, filename=nnom,datatype="INT1U",format="GTiff",overwrite=FALSE)
aaa<-2
}
################...