Nothing
#' Available north symbols.
#' @description Displays avaliable north symbols.
#' @note The symbols were obtained from QGIS 2.8.1 - Wien.
#' @references http://www.qgis.org/en/site
#' @export
#' @examples
#' northSymbols()
northSymbols <- function() {
img <- readPNG(paste0(system.file('symbols', package = 'ggsn'),
'/', 'symbols.png'))
plot(0, type='n', xlim=0:1, ylim=0:1, axes = F, xlab = '', ylab = '')
rasterImage(img, 0, 0, 1, 1)
}
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.