Plot legends for double proportional triangles maps.
legendPropTriangles(pos = "topleft", title.txt, var.txt, var2.txt,
title.cex = 0.8, cex = 1, values.cex = 0.6, var, var2, r, r2,
col = "red", col2 = "blue", frame = FALSE, values.rnd = 0,
style = "c")
Arguments
- pos
- position of the legend, one of "topleft", "top",
"topright", "left", "right", "bottomleft", "bottom", "bottomright".
- title.txt
- title of the legend.
- var.txt
- name of var.
- var2.txt
- name of var2.
- title.cex
- size of the legend title.
- cex
- size of the legend. 2 means two times bigger.
- values.cex
- size of the values in the legend.
- var
- a first vector of positive values.
- var2
- a second vector of positive values.
- r
- a first vector of sizes.
- r2
- a second vector of sizes.
- col
- color of symbols.
- col2
- second color of symbols.
- frame
- whether to add a frame to the legend (TRUE) or
not (FALSE).
- values.rnd
- number of decimal places of the values in
the legend.
- style
- either "c" or "e". The legend has two display
styles, "c" stands for compact and "e" for extended.
Examples
data("nuts2006")
plot(nuts0.spdf)
box()
var <- round((nuts0.df$pop2008 / sum(nuts0.df$pop2008))*100,2)
var2 <- round((nuts0.df$gdppps2008 / sum(nuts0.df$gdppps2008))*100,2)
r <- sqrt(var)/2*1000000
r2 <- sqrt(var2)/2*1000000
legendPropTriangles(pos = "topright", var.txt = "population totale (habs)",
var2.txt = "pib (euros)", title.txt="PIB par habitant",
title.cex = 0.8, values.cex = 0.6, cex = 1,
var = var, var2 = var2, r = r, r2 = r2,
col="green", col2="yellow", frame=TRUE, values.rnd=2,
style="c")
