library(mapsf)
# select a theme
mf_theme("candy")
# import sample dataset
mtq <- mf_get_mtq()
# display the shadow of a polygon layer
mf_shadow(mtq)
# display polygons
mf_map(mtq, add = TRUE)
# display north arrow
mf_arrow()
# display scale bar
mf_scale(size = 5)
# display credits
mf_credits(txt = "T. Giraud, 2021 - mapsf 0.1.1")
# display title
mf_title()
# display an annotation
mf_annotation(mtq[14, ],
              txt = "Ceci est\nune annotation")