R/as-osm.R

In osmar: OpenStreetMap and R

#' Convert osmar object to OSM-XML
#'
#' Convert an osmar object to an OSM-XML object.
#'
#' @param obj An \code{\link{osmar}} object
#' @param ... Ignored
#'
#' @return An xml object
#'
#' @note Not yet implemented!
as_osm <- function(obj, ...) {
  stopifnot(class(obj) == "osmar")

  stop("Not yet implemented")
}