R/utils.R

Defines functions .get_proj4string .get_data .as_spatial .mat2list

.mat2list <- function(x) {
    lapply(seq_len(ncol(x)), function(i) x[,i])
}

.as_spatial <- function(pv) pv@spatial

.get_data <- function(sdf) sdf@data

.get_proj4string <- function(s) s@proj4string
kevinrue/spatula documentation built on May 9, 2020, 8:42 a.m.