# legendPropTriangles: Legend for Double Proportional Triangles Maps In cartography: Thematic Cartography

## Description

Plot legends for double proportional triangles maps.

## Usage

 ```1 2 3 4``` ```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", "right", "bottomright", "bottom", "bottomleft", "left" or a vector of two coordinates in map units (c(x, y)). `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

 ``` 1 2 3 4 5 6 7 8 9 10 11 12 13 14``` ```library(sp) 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") ```

cartography documentation built on April 30, 2018, 5:04 p.m.