commit 69cc54a9cf78dc18e7b336c45920966fecd249bb
author Marc Kupietz <kupietz@ids-mannheim.de> Mon Sep 30 12:06:54 2019 +0200
committer Marc Kupietz <kupietz@ids-mannheim.de> Tue Oct 01 18:23:57 2019 +0200
tree 19a28e40d7572b3813446efcf4701e5fe44049cb
parent 0a96b28bcea0d7116db2b87c7977c24ec337413d

Start tidyverse migration

Change-Id: Ifc972de789c22e2ff43159740d7f1fa7125e1ef2

demo/regional.R

diff --git a/demo/regional.R b/demo/regional.R
index 067e3e2..60ea5c7 100755
--- a/demo/regional.R
+++ b/demo/regional.R
@@ -73,7 +73,7 @@
   map$region <- sapply(map$grp, function(grp) regions$region[grp])
   map$url <- sapply(map$grp, function(grp) regions$url[grp])
   regionsPlot <- ggplot(map) +
-    geom_polygon(aes(x=long, y=lat, group=group, fill=ipm, text=region), colour= "black", size=.1) +
+    geom_polygon(aes(x=long, y=lat, group=group, fill=ipm, hack=region), colour= "black", size=.1) +
     theme(axis.line.x = element_blank(),
           axis.line.y = element_blank(),
           panel.grid.major = element_blank(),