Displaying 1 result from an estimated 1 matches for "ndvimatrix".
Did you mean:
ddimatrix
2010 Oct 06
1
R getting slower until it breaks...
...sBlock(rast1,row=VALUE[[2]],nrow=VALUE[[3]],col=VALUE[[1]],ncol=VALUE[[3]])
cells2 <- getValuesBlock(rast2,row=VALUE[[2]],nrow=VALUE[[3]],col=VALUE[[1]],ncol=VALUE[[3]])
cells1[is.na(cells1)]<-0;
cells2[is.na(cells2)]<-0;
calculNDVI <-(cells1 - cells2) / (cells1 + cells2)
NDVImatrix <- matrix(calculNDVI,nrow=VALUE[[3]],ncol=VALUE[[3]], byrow=TRUE)
NDVImatrix <- NDVImatrix + 1
NDVImatrix <- NDVImatrix * (255/2)
return(NDVImatrix)
}
#################################################################################
## Fonction 1b - Faire le tiff
make.tiff&l...