Nothing
list.maps <-
function(prefix = "*") {
raster.list <- execGRASS("g.list", type = "raster", pattern = prefix, intern = TRUE)
vector.list <- execGRASS("g.list", type = "vector", pattern = prefix, intern = TRUE)
return(list(raster = raster.list, vector = vector.list))
}
Any scripts or data that you put into this service are public.
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.