Description Usage Arguments Value Examples
View source: R/emodnet_map_logo.R
Add the EMODnet logo to your ggplot
1 2 3 4 5 6 7 8 |
plot |
ggplot |
path |
character |
gravity |
character |
offset |
character |
color |
boolean |
... |
params to be passed to ggplot2::ggsave() |
png
1 2 3 4 5 6 7 8 9 | aphiaid <- 107451
specname <- "Eriocheir sinensis"
Esgrid <- sf::st_read(paste0("http://geo.vliz.be/geoserver/wfs/ows?", "service=WFS&version=1.3.0&",
"request=GetFeature&", "typeName=Dataportal%3Aeurobis_grid_1d",
"-obisenv&", "viewParams=aphiaid%3A", aphiaid, "&", "outputFormat=json", "&maxFeatures=10"))
plot <- emodnet_map_plot(Esgrid, fill = Esgrid$RecordCount, title = specname,
subtitle = paste("Aphiaid =",aphiaid), legend = "Abundance",plot_polygon_border=TRUE)
emodnet_map_logo(plot, path = paste0(tempfile(), ".png"),
width = 198, height = 121, dpi = 300, units = "mm")
|
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.