# NOT RUN {
library(geotopbricks)
## Simulation working path
file <- system.file("rendena100/SnowDepthMapFile-2014-MA-mean-winter-2013-2014.asc",
package="geotopbricks")
snow <- raster(file)
snowfile <- "./temporary/snow.asc"
dir.create("./temporary")
writeRasterxGEOtop(x=snow,file=snowfile)
# }
Run the code above in your browser using DataLab