#Script to turn grids into ascii files to read into ARCGIS
require(rgdal)
require(sp)
require(raster)
require(maptools)
dom<-"DOM_cov.grd"
domc<-raster(dom)
writeRaster(domc, "DOM_cov.asc", format="ascii")

#Actually superior to write as a tiff, so that the projection stays
writeRaster(domc, "DOM_cov.tif", format="GTiff")