Merge pull request #145 from bockthom/thomas-updates

Change shape of `Vertices` in the legend of plots to avoid confusion

Reviewed-by: Claus Hunsen <[email protected]>

NEWS.md

@@ -1,5 +1,10 @@
 # codeface-extraction-r – Changelog
 
+## Unversioned
+
+### Changed/Improved
+- Change shape of `Vertices` in the legend of plots to avoid confusion (f4fb4807cfd87d9d552a9ede92ea65ae4a386a04)
+
 
 ## 3.4
 

showcase.R

@@ -15,7 +15,7 @@
 ## Copyright 2017 by Raphael Nömmer <[email protected]>
 ## Copyright 2017 by Christian Hechtl <[email protected]>
 ## Copyright 2017 by Felix Prasse <[email protected]>
-## Copyright 2017 by Thomas Bock <[email protected]>
+## Copyright 2017-2018 by Thomas Bock <[email protected]>
 ## All Rights Reserved.
 
 
@@ -324,7 +324,7 @@ y = NetworkBuilder$new(project.data = y.data, network.conf = net.conf)
 #         plot.title = ggplot2::element_text(hjust = 0.5, size = 15),
 #         plot.margin = ggplot2::unit(c(0.5, 0.5, 0.5, 0.5), "cm")
 #     )
-# ggplot2::ggsave("plot-multi.png", plot = p)
+# ggplot2::ggsave("plot-multi.png", plot = p, width = 6.57, height = 4.114)
 
 
 ## / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / / /

util-plot.R

@@ -13,6 +13,7 @@
 ##
 ## Copyright 2017-2018 by Claus Hunsen <[email protected]>
 ## Copyright 2018 by Barbara Eckl <[email protected]>
+## Copyright 2018 by Thomas Bock <[email protected]>
 ## All Rights Reserved.
 
 
@@ -170,7 +171,7 @@ plot.get.plot.for.network = function(network, labels = TRUE) {
         ggplot2::guides(
             ## reduce size of symbols in legend
             shape = ggplot2::guide_legend(override.aes = list(size = PLOT.VERTEX.SIZE.LEGEND)),
-            color = ggplot2::guide_legend(override.aes = list(size = PLOT.VERTEX.SIZE.LEGEND))
+            color = ggplot2::guide_legend(override.aes = list(size = PLOT.VERTEX.SIZE.LEGEND, shape = 15))
         ) +
         ggplot2::theme(
             legend.position = "bottom",