R/geojsonsf-package.R

In geojsonsf: GeoJSON to Simple Feature Converter

#' @useDynLib geojsonsf, .registration = TRUE
#' @importFrom Rcpp sourceCpp
NULL

#' geo_melbourne
#'
#' GeoJSON data of Melbourne's Inner suburbs.
"geo_melbourne"

#' @export
print.geojson <- function( x, ... ) sapply(x, function(x) cat(x, "\n"))


handle_digits <- function( digits ) {
	if( is.null( digits )) return(-1)
	return( as.integer( digits ) )
}