#' @title Test function for grid
#' @description Extract from a rasterband a particular wavelength, or spectral index
#' @param x blala
#' @return A raster layer
#' @export
test_fun <- function(x){
write.table(x,file='/H03_CANHEMON/univa_test/test.txt')
return(x)
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.