#' @name afrihighway
#' @aliases sflines
#' @title African trans-continental highway network lines
#'
#' @description a \code{sf} object of simplified lines of transcontinental highway network
#' See data-raw/afrilearndata-creation.R for how the data object is created.
#'
#' @format Formal class 'sf'; 100 rows, 2 columns
#' \itemize{
#' \item{Name} {character vector of section names}
#' \item{geom} {sfc_LINESTRING}
#' }
#'
#' Geographical coordinates WGS84 datum (CRS EPSG 4326)
#'
#' @seealso
#' https://en.wikipedia.org/wiki/Trans-African_Highway_network
#'
#' @source \url{https://www.google.com/maps/d/u/0/viewer?msa=0&mid=1nEU2oBFzSxabx3Z14nTyZP3KSzY&ll=1.9249940151081273%2C12.874260000000021&z=3}
#' @docType data
#' @keywords datasets sf
#' @examples
#' if (requireNamespace("sf", quietly = TRUE)) {
#' library(sf)
#' data(afrihighway)
#' # or
#' filename <- system.file("extdata","trans-african-highway.kml",
#' package="afrilearndata", mustWork=TRUE)
#' afrihighway <- sf::read_sf(filename)
#' #remove Description column, only has contents in first row
#' afrihighway <- afrihighway[ , which(names(afrihighway)!='Description')]
#'
#' plot(sf::st_geometry(afrihighway))
#' }
"afrihighway"
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.