Nothing
# Generated by using Rcpp::compileAttributes() -> do not edit by hand
# Generator token: 10BE3573-1514-4C36-9D1C-5A225CD40393
#' @rdname coords
as_coords.default <- function(object, ..., fmt = 1L) {
.Call(`_Waypoint_as_coords`, object, fmt)
}
#' @rdname convert
convert.coords <- function(x, fmt, ...) {
.Call(`_Waypoint_convertcoords`, x, fmt)
}
#' @rdname coords
`latlon<-` <- function(cd, value) {
.Call(`_Waypoint_latlon`, cd, value)
}
#' @rdname validate
validate.coords <- function(x, ..., force = TRUE) {
.Call(`_Waypoint_validatecoords`, x, force)
}
#' @rdname format
format.coords <- function(x, ..., usenames = TRUE) {
.Call(`_Waypoint_formatcoords`, x, usenames)
}
#' @rdname waypoints
as_waypoints.default <- function(object, ..., fmt = 1L) {
.Call(`_Waypoint_as_waypoints`, object, fmt)
}
#' @rdname convert
convert.waypoints <- function(x, fmt, ...) {
.Call(`_Waypoint_convertwaypoints`, x, fmt)
}
#' @rdname validate
validate.waypoints <- function(x, ..., force = TRUE) {
.Call(`_Waypoint_validatewaypoints`, x, force)
}
#' @rdname format
format.waypoints <- function(x, ..., usenames = TRUE) {
.Call(`_Waypoint_formatwaypoints`, x, usenames)
}
#' @rdname format
ll_headers <- function(aswidth, fmt) {
.Call(`_Waypoint_ll_headers`, aswidth, fmt)
}
#' @rdname coords
as_coords.waypoints <- function(object, which, ...) {
.Call(`_Waypoint_as_coordswaypoints`, object, which)
}
Any scripts or data that you put into this service are public.
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.