# NOT RUN {
require(raster) #load required package.
r1<-raster::raster(ext=extent(c(0,10,0,10)), res=1, vals=1:100) #create example raster.
spdf<-spdf_from_extent(r1) #convert the raster extent to SpatialPolygonsdataFrame.
plot(spdf) #Plot results.
# }
Run the code above in your browser using DataLab