if (FALSE) {
file <- system.file("external/ndvi", package="rts")
rt <- rts(file) # read the ndvi time series from the specified file
cellFromRowCol(rt,15,20)
cellFromRowCol(rt,c(16:20),c(11:15))
cellFromXY(rt,c(645000,57345000))
}
Run the code above in your browser using DataLab