mun.plot: Plotting municipality-level maps of Switzerland
In RSwissMaps: Plot and Save Customised Swiss Maps

mun.plot offers the possbility to visualise Swiss municipality-level data on a map. It uses the geodata that is made publicly available by the Swiss Federal Statistical Office. The package comes with geodata for 2016. Additional geodata can be downloaded with map.load. The arguments cantons, districts and municipalities make it easy to plot customised maps. The function mun.template provides templates for data collection.

mun.plot(bfs_id, data, year, add_geodata_path = ".", endofyear = FALSE,
  cantons = NULL, districts = NULL, municipalities = NULL,
  lakes = "all", boundaries = "m", boundaries_size = 0.2,
  boundaries_color = "white", extrema = "global", continuous = TRUE,
  color_continuous = c("#fee5d9", "#a50f15"), color_discrete = c("seq",
  "1"), color_na = "gray90", title = NULL, subtitle = NULL,
  caption = NULL, legend_title = NULL, legend_position = "bottom",
  save = FALSE, filename = "mun_plot.png", dpi = 300, width = NA,
  heigth = NA, units = "cm")

`bfs_id`	a numeric vector with municipality identification numbers as used by the Swiss Federal Statistical Office corresponding to `data`. For templates, see `mun.template`.
`data`	a vector of data at municipality-level.
`year`	numeric. Indicates what map version to plot. Available with package: `2016`. For additional geodata, see: `map.load`.
`add_geodata_path`	a character string with the path to the folder where additional geodata is saved.
`endofyear`	if `TRUE`, administrative boundaries as by December 31 of `year` are plotted.
`cantons`	input either numeric (canton identification numbers) or character (canton abbreviations) vector to plot municipalities of selected cantons.
`districts`	input either numeric (district identification numbers) or character (district names) vector to plot municipalities of selected districts.
`municipalities`	input either numeric (municipality identification numbers) or character (municipality names) vector to plot selected municipalities.
`lakes`	input either numeric (lake identification numbers) or character (lakes names) vector to plot selected lakes. If `"none"`, no lakes are plotted. If `"all"`, all available lakes are plotted.
`boundaries`	character vector naming the boundaries to map. "m": municipality boundaries (default) "d": district boundaries "c": canton boundaries "n": national boundaries
`boundaries_size`	numeric vector that specifies the size of the corresponding element in `boundaries`.
`boundaries_color`	character vector that specifies the color of the corresponding element in `boundaries`.
`extrema`	if `local`, data of municipalities that are not selected by `cantons`, `districts`, or `municipalities` is not considered in the color scaling process.
`continuous`	set to `FALSE`, if `data` is non-continuous.
`color_continuous`	character vector with 2 elements to specifiy the plot color if `continuous = TRUE`. `color_continuous = c(low, high)` resulting in a two color gradient from color `low` to color `high`.
`color_discrete`	character vector with 2 elements to specifiy the plot color if `continuous = FALSE`. `color_discrete = c(type, palette)` resulting in a color scheme from ColorBrewer that are particularly well suited to display discrete values on a map. `type`: one of seq (sequential), div (diverging) or qual (qualitative) `palette`: index into the list of palettes of appropriate `type`; character needed!
`color_na`	color of missing values.
`title, subtitle, caption, legend_title`	text for titles or caption below the plot.
`legend_position`	the position of the legend ("none", "left", "right", "bottom", "top")
`save`	if `TRUE`, the plot will be saved to disk.
`filename`	file name to create on disk incl. image file format (".jpeg", ".png", ".tiff", etc.).
`dpi`	plot resolution. Applies only to raster output types.
`width, heigth, units`	plot size in units ("in", "cm", or "mm"). If not supplied, uses the size of current graphics device.

 # Generating sample data:
 dt <- mun.template(2016)
 for(i in 1:nrow(dt)){dt$values[i] <- sample(c(300:700), 1)/1000}

 # Plotting sample data:
 mun.plot(dt$bfs_nr, dt$values, 2016)

 # Plotting sample data for the canton of Aargau:
 mun.plot(dt$bfs_nr, dt$values, 2016, cantons = c("AG"),
 lakes = c("Hallwilersee"))

sh: 1: cannot create /dev/null: Permission denied
sh: 1: cannot create /dev/null: Permission denied
Warning message:
Use of `data_combined$data` is discouraged. Use `data` instead. 
Warning messages:
1: Use of `data_combined$data` is discouraged. Use `data` instead. 
2: Removed 2 row(s) containing missing values (geom_path).