README.md
In TIvanDijk/TivD: Tools for ggplot

PRELIMINARY package containing several function and themes for ggplot2

Installation

You can directly install this package from Github

devtools::install_github("TIvanDijk/TivD")

To replicate the output of this markdown file, you’ll need at least the following packages

library(dplyr)
library(TivD)
library(ggplot2)

Maps

For illustration purposes, we create a random dataset containing the municipality, associated province and some random count value.

library(TivD)

df = cbind(GPdata[, c('gem', 'prov')], count = rpois(352, 100))
head(df)
##           gem      prov count
## 1   Eemsdelta Groningen   108
## 2   Groningen Groningen    97
## 3      Almere Flevoland   111
## 4 Stadskanaal Groningen    95
## 5     Veendam Groningen   107
## 6    Zeewolde Flevoland    96

To plot the counts per Dutch municipality, you can use the NLDgem function.

NLDgem(df[, c('gem', 'count')], title = 'Random Poisson Values', varname = 'count')

To plot the counts per Dutch province, you can use the NLDprov function. I first summarise the counts across the province to get the dataset in the appropriate format.

df.prov <- dplyr::summarise( group_by(df, prov), count = sum(count))
NLDprov(df.prov, title = 'Sum of Poisson', varname = 'count')

Themes

To illustrate the themes, consider the following simple plot

p <- ggplot(data.frame(x = -5:5), aes( x = x)) +
  stat_function(aes(color = 'line 1'), fun = function(x) sin(x), size = 1.1) +
  stat_function(aes(color = 'line 2'), fun = function(x) cos(x), size = 1.1) +
  labs(title = 'Two Interesting Lines', subtitle = 'notice the alternating pattern',
       caption = 'source: high school mathematics')