bnp

commit b67e012c925f9dd0c95fcb1b56a07510fbf0105b
parent 23159800bfc7b1004f7ca603635bd11ef1f5dc57
Author: Jared Tobin <jared@jtobin.ca>
Date:   Wed,  9 Mar 2016 16:23:13 +1300

Add data plot.

Diffstat:
M
finite-gaussian-mixture/src/simulation_conditional.r
 | 
3
+++

1 file changed, 3 insertions(+), 0 deletions(-)
diff --git a/finite-gaussian-mixture/src/simulation_conditional.r b/finite-gaussian-mixture/src/simulation_conditional.r
@@ -33,6 +33,9 @@ dp = melt(as.data.frame(params$p))
 dm = melt(as.data.frame(params$m))
 ds = melt(as.data.frame(params$s))
 
+py = ggplot(d, aes(value, colour = factor(L1), fill = factor(L1))) +
+       geom_density(alpha = 0.5)
+
 pp = ggplot(dp, aes(x = seq_along(value), y = value, colour = variable)) +
        geom_line()