#' spatial2grid
#'
#' spatial2grid
#' @param obj spatial object
#' @param cellsize cellsize
#' @param ... options according to the spatial object
#' @keywords spatialManip
#' @export
#' @examples
#' \dontrun{
#' spatial2grid(...)
#' }
spatial2grid <- function(obj,cellsize=NULL,...) {
x <- buildGridTopo(obj=obj,cellsize=cellsize,...)
spdf <- construct(type="grid",x=x,proj4S=crs(proj4string(obj)))
return(spdf)
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.