## Not run:
# ### raster data ###
# library(sp)
# library(raster)
#
# data(meuse.grid)
# coordinates(meuse.grid) = ~x+y
# proj4string(meuse.grid) <- CRS("+init=epsg:28992")
# gridded(meuse.grid) = TRUE
#
# viewExtent(meuse.grid)
# ## End(Not run)
Run the code above in your browser using DataLab