bnp

commit 4cd4be71f3c88b48735906d080d6e6a65cfc5738
parent ddb11edde2671bceedecae7a22fed28483c8b56e
Author: Jared Tobin <jared@jtobin.ca>
Date:   Mon, 14 Mar 2016 22:28:30 +1300

Improve color in plots.

Diffstat:
M
finite-gaussian-mixture/src/simulation_multivariate_conditional.r
 | 
6
+++---

1 file changed, 3 insertions(+), 3 deletions(-)
diff --git a/finite-gaussian-mixture/src/simulation_multivariate_conditional.r b/finite-gaussian-mixture/src/simulation_multivariate_conditional.r
@@ -62,9 +62,9 @@ p_late =
   ggplot(late, aes(x, y, value, colour = factor(variable), fill = factor(variable))) +
     geom_point(alpha = 0.5)
 
-mean_convergence_plots = ggplot(dm, aes(x, y)) +
-  geom_point(fill = 'darkblue', colour = 'darkblue', alpha = 0.2) +
-  facet_grid(. ~ L1)
+mean_convergence_plots =
+  ggplot(dm, aes(x, y, colour = factor(L1), fill = factor(L1))) +
+    geom_point(alpha = 0.2) + facet_grid(. ~ L1)
 
 chain_plots = grid.arrange(pp, mean_convergence_plots, nrow = 2)